还是关于ASP的分页显示问题

我的代码如下

Dim rs 'Recordset对象
Dim sql '数据操作命令
Dim count '消息计数器，用来判断是否到达分页条目
Dim page '用户请求的页面索引
Dim pageSize '每页显示信息数目
sql="SELECt * FROM course"
Set rs = ExecuteQuery(sql)
If rs.RecordCount=0 Then
Alert("对不起，没有满足你输入的条件！")
GoBack()
Response.End
End If
count = 0 '初始化计数器
pageSize = 10 '每页显示10条记录
rs.PageSize=pageSize
page= Request("page")
If IsEmpty(page) OR CInt(page) < 1 OR CInt(page) > rs.PageCount Then
page = 1
End If
rs.AbsolutePage = page '指定当前页码

运行后出现CInt 类型不匹配问题

找大师帮忙修改！ 或者帮我写一个能够替换的代码 万分感谢

page= Request("page")
If IsEmpty(page) OR CInt(page) < 1 OR CInt(page) > rs.PageCount Then
page = 1

换成↓

page=clng(request("page"))
if page=0 then page=1

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息