UC知道asp 如何进行行列显示分页?
来源：百度知道 编辑：UC知道 时间：2024/05/16 08:42:47
比如
<%Set Rs_news=Server.CreateObject("Adodb.RecordSet")
SQL="Select * From news"
Rs_news.open sql,conn,1,1%>
<%=rs_news("bt")%>
<%rs_news.movenext
loop%>
如何进行4行2列的分页显示
<%Set Rs_news=Server.CreateObject("Adodb.RecordSet")
SQL="Select * From news"
Rs_news.open sql,conn,1,1%>
<%=rs_news("bt")%>
<%rs_news.movenext
loop%>
如何进行4行2列的分页显示
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<%
i=1
Set Rs_news=Server.CreateObject("Adodb.RecordSet")
SQL="Select top 8 * From news"
Rs_news.open sql,conn,1,1
do while not Rs_news.eof
%>
<td height="20" ><span>·</span> <a href="http://www.cyxxg.com" target="_blank">
<%if len(trim(rs_news("bt")))>15 then
response.write left(rs_news(rs("bt")),12)&".."
else
response.write trim(rs_news("bt"))
end if%>
</a>
<%
if i mod 2 =0 then
%>
</td>
</tr>
<%
end if
%>
<%
i=i+1
Rs_news.movenext
loop
%>