For counter=1 To 10
response.Write"<table ><tr> "
for countter=1 to 7
response.Write" <td>"
在这个地方每循环一次输出一个数据库的记录
response.Write" </td>"
next
response.Write"</tr></table>"
next
也就是把数据库记录按10行7列输出
參考答案:response.Write"<table >"
For counter=1 To 10
response.Write"<tr> "
for countter=1 to 7
response.Write" <td>"
在这个地方每循环一次输出一个数据库的记录
response.Write" </td>"
rs.movenext
if rs.eof then exit for
next
response.Write"</tr>"
nextresponse.Write"<table>"
