杭州交通信息网魔兽霍格:ASP如何分三列显示分页呢
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/30 01:15:45
我想问一下怎么让它形成这样的效果：每页显示10个记录，分三列显示，
1 2 3
4 5 6
7 8 9
10 11 12
大家帮我下。该怎么设计呢？
to:ryland123
谢谢你 用你的代码出现以下提示
错误类型：
Microsoft VBScript 编译器错误 (0x800A03FC)
缺少 'Next'
/dmt2/gjqhcode3.asp, line 150
else
能告诉我这 NEXT 该加哪吗??谢谢
我把整个重新写给你该好了
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#E8EEFF">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from [ASDD] where Qy='ABC' order by adddate desc"
rs.open sql,conn,1,1
alp = rs.recordcount
while not rs.eof
%>
<tr>
<%for j=0 to 2 %>
<td width="33%" height="20" bgcolor="#ffffff">
<%if rs("show_id")="1" then%>
<font color="#FF0000"><%=Rs("L")%></font>
<%else%>
<font color="#006699"><%=Rs("L")%></font>
<%end if%>
</td>
<%rs.movenext
if rs.eof then
if j=0 then
Response.Write "<td width=33% bgcolor=#ffffff></td><td width=33% bgcolor=#ffffff></td>"
exit for
elseif j=1 then
Response.Write "<td width=33% bgcolor=#ffffff></td>"
exit for
elseif j=2 then
exit for
end if
next%>
</tr>
<%
wend
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
</table>
随便一本ASP的书，关于提取数据库中的数据，并显示的章节里都有。即可以使用现有的控件，也可以自己动态生成table,控制他的显示。