帮我看看这段代码.缺了点什么...!!

<!--#include file="conn.asp"-->

<%set rs=server.createobject("adodb.recordset")
rs.open "select * from cp order by id desc",conn,1,1
if rs.recordcount=0 then
%>

<%
else
rs.PageSize =2'每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")

if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if

if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if

rs.AbsolutePage=Page

if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
%>
<style type="text/css">
<!--
.STYLE1 {font-size: 12px}
--&g

if rs.eof then
response.write "<tr><td>暂时还没有任何相关信息</td></tr>"
else
rs.PageSize =10 '每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
i=1
while not rs.eof and i<=rs.pagesize
set id=rs("id")
set title=rs("title")
set cclass=rs("sort")
set ttime=rs("addtime")