用ASP实现输出多行多列表格的代码

　　我们在做网站时有时会碰要求输出一个多行多列的表格，这时我们在程序中可以用循环来实现，今天部落给大家演示一个比较简单的实例，供大家学习交流。

　　代码作用：用ASP输出多行两列表格

<table width="180" border="1" cellspacing="0" cellpadding="0">
<%
   dim rsObj,strSQL,i
   set rsObj=Server.CreateObject("ADODB.RecordSet")
   strSQL="SELECT* FROM ceshi ORDER BY id DESC"
   rsObj.Open strSQL,conn,adOpenKeyset,adLockReadOnly
   if not rsObj.eof then
     i=0
     response.write"<tr>"&vbcrlf
  do while not rsObj.eof
   i=i+1
     response.write"<td><a href=http://www.jsbulo.com>技术部落</a></td>"&vbcrlf
   if i mod 2=0 then
     response.write"</tr>"&vbcrlf
  response.write"<tr><td height=5 colspan=2></td></tr>"&vbcrlf
  response.write"<tr>"&vbcrlf
   end if
      rsObj.movenext
   loop
   if rsObj.eof and i mod 2<>0 then
    response.write"<td></td>"&vbcrlf
   end if
   response.write"</tr>"
  end if
%>
</table>

　　以上代码就是利用循环来实现表格的输出，本例中用的是ASP来实现多行两列的表格，如果你想实现三行三列或者多行多列的话可以对上面的代码稍做修改即可，其实他们原理都是一样的。

　　别的脚本语言比如：PHP，JSP等实现方法同ASP大致相同，这里部落就不一一说明了。