ASP 翻页程序有错,帮解决下~!!

[qiuaaa]

ASP 翻页程序有错,帮解决下~!!
悬赏分：5 - 离问题结束还有 14 天 22 小时
rs.pagesize=8
size=rs.pagesize
pagecount=rs.pagecount
page=int(request.QueryString("page"))
if page="" then page=1
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page\\\\\\\这行就是第17行

技术信息（用于支持人员）

错误类型：
ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/qq/admin/admingl.asp, 第 17 行

[yopy]

rs.pagesize=8
p=trim(request("page"))
if p <> "" then
if p<1 then p=1 end if
if p>trim(rs.pagecount) then
p=trim(rs.pagecount)
end if
else
p=1
end if
rs.absolutepage=p

[feiyangderizi]

修改如下
rs.pagesize=8
size=rs.pagesize
pagecount=rs.pagecount
page=int(request.QueryString("page"))
if page="" or Not(isNumeric(page)) then page=1
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page\\\\\\\这行就是第17行

[mzhmark]

page=int(request.QueryString("page"))
if page="" then page=1
if page<1 then page=1

改成
page=request.QueryString("page")
if page="" then page=1
if isnumeric(page) then
page=clng(page)
else
page=1
end if
if page<1 then page=1