asp连接数据库代码实例(3)
发布时间:2021-06-06
发布时间:2021-06-06
asp 连接数据库代码实例
page=clng(n)
end if
if rs.eof then
response.write\"<font color=#FF0000>暂没有信息!</font>\"
\'response.end
else
rs.absolutepage=page
end if
i=0
do while not rs.eof and i<rs.pagesize
\'do while not rs.eof
%>
--------如果是每行显示n个纪录开始----------------------------
<%
do while not rs.eof and i<rs.pagesize
\'do while not rs.eof
if i mod 5=0 then \'--------设置每行显示的个数
response.write \"<tr>\"
end if
%>
--------如果是每行显示n个纪录结束-----------------------------
<%=rs(\"id\")%>
<% rs.movenext
i=i+1
loop
%>
<%
response.write(\"共\"&rs.recordcount&\"条信息 \") if page<>1 then
response.write(\"<a href=?page=1 title=\'首页\'>首页</a> \")
else
response.write(\"首页 \")
end if
if page>1 then
response.write(\"<a href=?page=\"&page-1&\" title=\'上一页\'>上一页</a> \")
else
response.write(\"上一页 \")
end if
if page<n then