<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from stu order by id desc",conn,1,1
if rs.eof then
%>
暂时没有添加内容 |
<%
else
nowpage=request.QueryString("nowpage")
if nowpage="" or nowpage<1 then nowpage=1
if not rs.eof then
page_U=23 '每页显示记录数,由此修改
rs.pagesize=page_U
rs.absolutepage=nowpage
end if
n=1
do while (not rs.eof) and n<=page_U
%>
<%=rs("id")%> |
<%=rs("tname")%> |
<%=rs("tsex")%> |
<%=rs("tdate")%> |
<%=rs("tmail")%> |
<%
rs.movenext
n=n+1
loop
%>
|
