ASP分类问题!如何修改
以下代码如何修改成分页的呢<%I=I+1IfIMod2=0ThenResponse.Write("</TR></TBODY></TABLE><TABLEwidth=""9...
以下代码如何修改成分页的呢
<%
I=I+1
If I Mod 2 =0 Then
Response.Write("</TR></TBODY></TABLE><TABLE width=""98%"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0""><TBODY><TR vAlign=top align=middle><TD height=8></TD></TR><TR vAlign=top align=middle>")
End If
Rs.MoveNext
Loop
%> 展开
<%
I=I+1
If I Mod 2 =0 Then
Response.Write("</TR></TBODY></TABLE><TABLE width=""98%"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0""><TBODY><TR vAlign=top align=middle><TD height=8></TD></TR><TR vAlign=top align=middle>")
End If
Rs.MoveNext
Loop
%> 展开
2个回答
展开全部
你写的是什么?耍猴呢?
下面的代码常用于产品展示 2行每行有6个产品
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from 表名称 "
rs.open sql,conn,1,1
if rs.recordcount>0 then
if rs.recordcount>12 then
zs=12
else
zs=rs.recordcount
end if
for j=1 to zs
if j mod 6=1 then response.Write "<tr>"
%>
<td>这里面可以在插入你想要的循环的 任意表格布局</td>
<%
if j mod 6=0 then response.Write "</tr>"
rs.movenext
if rs.eof then exit for
next
end if
%>
下面的代码常用于产品展示 2行每行有6个产品
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from 表名称 "
rs.open sql,conn,1,1
if rs.recordcount>0 then
if rs.recordcount>12 then
zs=12
else
zs=rs.recordcount
end if
for j=1 to zs
if j mod 6=1 then response.Write "<tr>"
%>
<td>这里面可以在插入你想要的循环的 任意表格布局</td>
<%
if j mod 6=0 then response.Write "</tr>"
rs.movenext
if rs.eof then exit for
next
end if
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询