按列显示数据表中字段的值

80酷酷网    80kuku.com

  数据|显示  在织梦论坛看到有很多会员提到如何通过循环do while调用数据表字段的问题。网上也见过这种方法很多,但感觉都挺复杂的,有的都动用Mod运算符进行取余运算了。包括我自己,在实际工作中实现效果也有点过于复杂了。试着改用一下分列显示的效果(分列显示效果见下图),感觉代码简练了好多,而且易于初学asp的用户修改。

代码如下:

<%
'绑定数据库Conn,略......

Set rs = Conn.Execute("select top 7 ID from news order by ID asc")
if not(rs.eof and rs.bof) then
response.write "<table width=""80%"" border=""1"">" & Chr(10)
do while not rs.eof
response.write " <tr width=""20%"">" & Chr(10)
for i=1 to 4
response.write " <td>"
if not rs.eof then
response.write rs("ID")
rs.movenext
else
response.write "."
end if
response.write "</td>" & Chr(10)
next
response.write " </tr>" & Chr(10)
loop
response.write "</table>"
else
response.write "未有记录......"
end if
rs.close : set rs = nothing
%>

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: