| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 489 人关注过本帖
标题:strTemp中的循环问题
只看楼主 加入收藏
dou521
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2009-3-19
结帖率:91.67%
收藏
 问题点数:0 回复次数:4 
strTemp中的循环问题
循环错误,请高手指点

sub ArticleContent(intTitleLen)
    dim i,strTemp
           i=1
              strTemp=""  
              strTemp= strTemp & "<table width=100% border=0 cellspacing=0 cellpadding=0>"
              strTemp= strTemp & "<tr>"
    do while not rsArticle.eof
    strTemp= strTemp & "<td>"
              strTemp= strTemp & "<a href=ProductShow.asp?ArticleID=" & rsArticle("articleid") & ">"
    fileExt=lcase(getFileExtName(rsArticle("DefaultPicUrl")))
    strTemp= strTemp & "</td></tr>"
              strTemp= strTemp & "<tr><td><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "</a>"
               strTemp= strTemp & "</td>"
                    if i mod 5= 0 then
          strTemp= strTemp & "</tr>"
          end if
                    rsArticle.movenext
                    i=i+1
                    strTemp= strTemp & "</table>"
  response.write strTemp
  if i>=15 then exit do
loop
end sub
搜索更多相关主题的帖子: strTemp 
2010-03-04 10:48
aspic
Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17
等 级:贵宾
威 望:51
帖 子:2258
专家分:8050
注 册:2008-2-18
收藏
得分:0 
请勿重复发帖
2010-03-04 11:26
dou521
Rank: 1
等 级:新手上路
帖 子:42
专家分:0
注 册:2009-3-19
收藏
得分:0 
帮我解决下呀
2010-03-04 12:31
aspic
Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17
等 级:贵宾
威 望:51
帖 子:2258
专家分:8050
注 册:2008-2-18
收藏
得分:0 
简化--》看运行后的html--》找到问题所在--》解决之
2010-03-04 17:44
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
sub ArticleContent(intTitleLen)
    dim i,strTemp
    i=1
    strTemp=""  
    strTemp= strTemp & "<table width=100% border=0 cellspacing=0 cellpadding=0>"
    strTemp= strTemp & "<tr>"
    do while not rsArticle.eof
       strTemp= strTemp & "<td>"
       strTemp= strTemp & "<a href=ProductShow.asp?ArticleID=" & rsArticle("articleid") & ">"
       fileExt=lcase(getFileExtName(rsArticle("DefaultPicUrl")))
       strTemp= strTemp & "</td></tr>"
       strTemp= strTemp & "<tr><td><a href=ArticleShow.asp?ArticleID=" & rsArticle("articleid") & ">" & rsArticle("Title") & "</a>"
       strTemp= strTemp & "</td>"
       if i mod 5= 0 then
          strTemp= strTemp & "</tr>"
       end if
       rsArticle.movenext
       i=i+1
       strTemp= strTemp & "</table>"
       response.write strTemp
       if i>=15 then exit do
    loop
end sub
i>=15这是做什么用呢?
2010-03-04 22:10
快速回复:strTemp中的循环问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017628 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved