怎么什么都显示不出来呢

<!--#include file="conn1.asp"-->
<%
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from student"
rs.open sql,conn,1,1
'返回当前所在的页数
if request("page")="" then
page=1
else if request("page")<1 then
page=1
else
page=request("page")
end if
'设置每页显示的记录数
rs.PageSize=2
rs.AbsolutePage=page
if rs.Recordcount=0 then
Response.Write "没有记录"
else
%>
<%
if rs.rof then
Response.Write"没有相关记录"
else
for ipage=1 to rs.PageSize
%>
<table cellpadding="2" cellspacing="2" border="2">
  <tr>
    <td height="23"><%=rs("sno")%></td>
    <td><%=rs("snme")%></td>
  </tr>

<%
rs.movenext
if rs.eof then exit for
next
end if
%>
</table>
<br>
共有<%=rs.recordcount%>条记录
当前是第<%=page%>页/共有<%=rs.pagecount%>条记录
<a href="Addnewpage.asp?page=1">第一页</a>
<%end if%>
<% if page<>1 then %>
   
   <a href="Addnewpage.asp?page=<%=(page-1)%>">上一页</a>
   <% end if %>
<% if page<>rs.pagecount then %>
   <a href="Addnewpage.asp?page=<%=(page+1)%>">下一页</a>
   
   <% end if %>
   <a href="Addnewpage.asp?page=<%=rs.pagecount%>">尾页</a>
<%

end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>


数据库表