<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="driver={SQL Server};server=zhangbo;UID=sa;Database=Northwind"
Conn.Open
Set rs=Server.CreateObject("ADODB.Recordset")
Set rs.ActiveConnection = Conn
rs.CursorType = 3
rs.Open "SELECT * FROM Employees"
if rs.pagecount<>0 then
rs.pagesize=2
end if
if request("pageno")="" then
pageno=1
else
pageno=clng(request("pageno"))
end if
rs.absolutepage=pageno
for i = 1 to rs.pagesize
response.write "<tr><td>"&rs("EmployeeID")&"</td></tr><br>"
rs.movenext
if rs.eof then exit for
next

if pageno<>1 then
response.write"<a href=t.asp?pageno="&(pageno-1)&">上一页</a>"
else
response.write"首页"
end if
if page<>rs.pagecount then
response.write "<a href=t.asp?pageno="&(pageno+1)&">下一页"&"</a>"

end if
%>
当达到最后一页的时候 还会显示 下一页
一点就该页无法显示 帮我看下怎么写