各位大哥大姐们，我是个菜鸟，学编程不久对编程还不是很熟悉。
现在我想写个程序，从数据库中调取数据然后让他在前台以表格形式出现，显示一个五列十行的。
下面我把程序附加如下，希望会的大哥大姐帮帮我，小弟先行谢过了。
  <%
dim rsxianlu
sql="select top 50 * from xianlu where x_top=1 and suoding<>1 order by id desc"
set rsxianlu=server.createobject("adodb.recordset")
rsxianlu.open sql,conn,1,1
while not rsxianlu.eof
response.write "<TR><td><a href='/xianlu/listxianlu.asp?id="&rsxianlu("id")&"'>"&gotTopic(rsxianlu("x_name"),24)&"</a></td><td  align='center'><a href='/xianlu/giveme.asp?id="&rsxianlu("id")&"'><img src='/xianlu/images/mfk_14.gif' width='40' height='20'  border='0'></a></TD></TR>"
rsxianlu.movenext
wend
rsxianlu.close
set rsxianlu=nothing
%>
应该怎样加一些程序就会出现了，可以的话把你们写得程序附加上来，谢谢各位了。

https://bbs.bccn.net/thread-229588-1-3.html

表格循环个人认为要使用嵌套循环，外循环为行数，内循环为列数

或者用一个变量来控制列数~

大家都来帮帮小弟吧，尽量把你们的程序也写出来，谢谢大家了

给你段代码你自己修改看看吧:

i=0 '记录集中有几条记录 下面的数字4 是想分成4列   i=行*列
response.write   " <table width='770' height='460' align='center'> "
do   while   not   rs.eof  
if   i   mod   4   =0   then   response.write   " <tr> "
%>
<%
response.Write"<td align='center'>"
response.Write"<a href='metro_end.asp?id=" & rs("id")&"&mm="&rs("name")&"' target='_blank' title='"& rs("name") &"'>"
response.Write"<img height='100' width='135' src='/"& rs("url") &"'/>"  '控制图片的大小和路径
response.Write"</a>"
response.Write"<br>"
response.Write"<br>"
response.Write"<a href='metro_end.asp?id=" & rs("id")&"&mm="&rs("name")&"' target='_blank' title='"& rs("name") &"'>"   '控制链接的传递参数的新建链接页
response.Write""& rs("name") &""
response.Write"</a>"
response.Write"</td>"
%>
<%
i=i+1
if   i   mod   4   =0   then   response.write   " </tr> "
rs.movenext
loop
if   i   mod   4 <> 0   then   response.write   " </tr> "
response.write   " </table> "
%>

得到思路的时候,自己动手试试就印象深刻了..