怎么才可以循环表格?

lquvfhp 发布于 2008-09-17 11:05， 873 次点击

怎么才可以循环表格,一行显示四个TD,然后在换行显示然后再换行显示10行就进行...

6 回复

yms1232008-09-17 11:10

表格用嵌套循环外行内列的方法
循环10行5列的表格
Dim Row,Col
'Row行,Col列
Response.Write "<table>"
For Row=0 To 10
    Response.Write "<tr>"
    For Col=0 To 5
        Response.Write "<td>"&Row&"行"&Col&"列<td>"
    Next
    Response.Write "</tr>"
Next
Response.Write "</table>"

lquvfhp2008-09-17 11:38

回复 2# yms123 的帖子

非常感谢你的。
还想问个你个问题。
如何从数据库中读去图片要求4行4列。

yms1232008-09-17 12:04

如果是分页读取可以在分页循环中用Mod来做
Dim iPage,Col,TempHTML
Col=0
TempHtml=""
For iPage=0 To rs.PageSize
    Col=Col+1
    If Col Mod 4=0 Then
       Response.Write "<tr>"&TempHtml&"</tr>"
       TempHtml=""
    Else
       TempHtml=TempHtml&"<td><img src="&rs("Image")&"></td>"
    End IF
Next

lquvfhp2008-09-17 12:15

回复 5# yms123 的帖子

TempHtml=""有点不太明白。还是就是Mod作用。

yms1232008-09-17 12:19

Mod两个数相除取余数
这里Col与4相除等于0就表示被4整除