这段代码是什么意思,请高手详细解释下,我是新手,谢谢!

2024-11-04 10:41:08
推荐回答(1个)
回答1:

Call OpenConn '打开数据库连接
sql = "select * from qk_product order by id desc" '赋值,SQL查询语句
Set rs = Server.CreateObject("ADODB.Recordset") '创建记录集实例
rs.open sql,conn,1,1 '打开记录集
If Not rs.eof then '判断记录是否存在,这里表示存在
rs.pagesize=8 '设置每页记录数
curpage = request.QueryString("curpage") '获取curpage参数值
If curpage="" Or (Not IsNumeric(curpage)) Or CLng(curpage)<1 Then '如果curpage为空、非数字或小于1,重新赋值curpage为1
curpage = 1
End If
curpage = CLng(curpage) '转换格式为长整型
If curpage>rs.pagecount Then '判断页码是否大于记录分页总页数,大于就重新赋值为总页数
curpage=rs.pagecount
response.end
End If
rs.absolutepage=curpage '移动指针到当前页码
index = 1 '赋值
For i=1 To rs.pagesize '循环,从1到每页记录数
If rs.eof Or rs.bof Then '如果指针移到最后就退出循环
Exit For
End If