ASP代码编程

原代码是这样：<%
pageno=request.querystring("pageno")
pmcount=10

set reco=server.createobject("ADODB.recordset")
sqlstr="select * from jltx order by id desc"
reco.open sqlstr,conn,1,1

reco.pagesize=pmcount
mpage=reco.pagecount

if isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage then
pageno=1
end if

reco.absolutepage=pageno

%>

Pages：[
<% for pno=1 to mpage
if pno=cint(pageno) then%>
<%=pno%>
<%else%>
<b><a href='default.asp?pageno=<%=pno%>'><%=pno%></a></b>
<%end if%>
<%next%>
]
即显示为：Page：[1 2

楼上的都是可用的!分页部分:
If Page <> 1 Then
Response.Write " <A HREF=default.asp?pageno=1> 第一页 </A>"
Response.Write " <A HREF=default.asp?pageno="&(pageno-1) & "> 上一页 </A> "
End If
If Page <> reco. PageCount Then
Response.Write "<A HREF=default.asp?pageno=" & (pageno+1)& "> 下一页 </A> "
Response.Write "<A HREF=default.asp?pageno="&reco. PageCount & "> 最后一页 </A> "
End If
Response.write" 页码：" &pageno& "/" & reco. PageCount

<% if (pageno-1)>0 then%>
<a href="<%=request.ServerVariables("SCRIPT_NAME")%>?pageno=<%=pageno-1%>">上一页</a>－
<% end if
if (pageno+1)<=rs.pagecount then%>
<a href="<%=request.ServerVariables("SCRIPT_NAME")%>?pageno=<%=pageno+1%>">下一页</a>－