请教一个很菜的问题 - 编程论坛

yms1232010-08-08 15:32

代码循环上加限制，表格循环都是嵌套双循环外行内列
或者用Mod法取余数
比如
Dim rs,i,tHtml,iHtml
i=0
tHtml=""
iHtml=""
Response.Write "<table>"
Do Until rs.EOF
   iHtml=iHtml&"<td><img src="&rs("Img")&"  width=120 height=120 /><td>"
   IF i Mod 2=0 Then'这里判断每行2个
      iHtml="<tr>"&iHtml&"</tr>"
      tHtml=tHtml&iHtml
      iHtml=""
   End IF
   i=i+1
   rs.MoveNext
Loop
'输出结果
Response.Write tHtml
Response.Write "</table>"
分页循环的道理也是一样的

[ 本帖最后由 yms123 于 2010-8-8 15:35 编辑 ]