1. 论坛系统升级为Xenforo，欢迎大家测试！
    排除公告

我这么简单的for循环到底是哪出了问题呢？

本帖由 风狼 于 2006-03-22 发布。版面名称：前端开发

  1. 风狼

    风狼 New Member

    注册:
    2005-10-01
    帖子:
    7,452
    赞:
    25
    Do While Not objRs.eof
    Response.Write "<tr bgcolor='#eeeeee'>"
    For i=1 to 5
    Response.Write "<td align='center'>"&objRs("name")&"</td>"
    objRs.MoveNext
    Next
    esponse.Write "</tr>"
    Loop


    错误提示：
    Microsoft VBScript 编译器错误 错误 '800a03f6'
    缺少 'End'

    /iisHelp/common/500-100.asp，行242 错误 '80020009'

    发生意外。


    我只是想每行输出五个数据呀，，，

    楼下会的弟兄给我解答下吧。。应该是编程思路出了故障。。。可怜可怜我这菜鸟吧~~~~
     
    #1 风狼, 2006-03-22
  2. 小叶

    小叶 New Member

    注册:
    2005-09-04
    帖子:
    17,941
    赞:
    33
    esponse.Write "</tr>"
    :) 我倒。。自己检讨

    Response.write "</tr> "
     
    #2 小叶, 2006-03-22
  3. 风狼

    风狼 New Member

    注册:
    2005-10-01
    帖子:
    7,452
    赞:
    25
    呀哦。这个是我转过来时不少心删的。。这里不是问题所在
     
    #3 风狼, 2006-03-22
  4. 著名混混

    著名混混 New Member

    注册:
    2006-03-22
    帖子:
    292
    赞:
    1
    每行输入5个数据似乎不是这么写的，就你的程序来说，出错不是你这里的问题，可能是你少写了end if什么的

    但是我觉得你这个程序似乎不能到每行5个数据
     
    #4 著名混混, 2006-03-22
  5. 小叶

    小叶 New Member

    注册:
    2005-09-04
    帖子:
    17,941
    赞:
    33
    dim i
    i=0
    do while not objRs.eof and i<6

    。。。。。。。。。中间这里自己补充完整

    i=i+1
    if i>6 then exit do
    objRs.MoveNext
    loop
     
    #5 小叶, 2006-03-22
  6. wm_chief

    wm_chief New Member

    注册:
    2005-09-05
    帖子:
    17,890
    赞:
    46
    。。。
     
    #6 wm_chief, 2006-03-22
  7. Tameway

    Tameway New Member

    注册:
    2005-09-06
    帖子:
    1,286
    赞:
    8
    程序思路正确

    其他地方问题
     
    #7 Tameway, 2006-03-22
(您必须注册并登陆后发新主题。)
Toggle Width
语言
简体中文