模糊查询与精确查询的分页问题
如题，一个相同的程序在模糊查询的页面能够正常的分页，但在精确查询的页面却不能正常执行！这是咋回事咧？我的源程序如下：
dim rs,sql,bianhao
bianhao=Request.Form("bianhao")
set rs = Server.CreateObject("adodb.recordset")
sql="select * from message where gongsi like '%"&bianhao&"%' order by ID DESC"
rs.open sql,conn,1,1
if rs.recordcount > 0 then
rs.pagesize=1 '定义页大小
dim page,page_count
page_count=rs.pagecount
page=Request.QueryString("page")
if page <> "" then
if not Isnumeric(page) then
Response.Write("<script language='javascript'>alert('请不要修改地址栏参数');window.history.go(-1)</script>") '防止有人修改地址栏参数
Response.End()
end if
end if
page=Cint(Request.QueryString("page"))
if page = "" then page=1
if page < 1 then page =1
if page > page_count then page=page_count
rs.absolutepage=page '执行页面
end if
