UC知道ASP高手请解释下，这里的查询语句
来源：百度知道 编辑：UC知道 时间：2024/05/08 18:32:14
Dim Rs,Sql,CurPage,display
Set Rs = Server.CreateObject("Adodb.Recordset")
Set Rs_count = Server.CreateObject("Adodb.Recordset")
Rs.CursorLocation = 2
Rs_count.CursorLocation = 2
Rs_count.open "gqsj_search_count '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'",conn,1,1
curpage = cint(request.QueryString("CurPage"))'传送页码值
psize=100
pcount = int(record/psize) '计算总页数
If record mod psize > 0 Then pcount = pcount + 1
If curpage = "" or curpage = 0 Then curpage = 1
If curpage > pcount then '让传递的页码值不超出最大值
curpage = pcount
End if
Rs.open "gqsj_search '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'",conn,1,1
If Not Rs.Eof Then
Dim TotalPages
TotalPage
Set Rs = Server.CreateObject("Adodb.Recordset")
Set Rs_count = Server.CreateObject("Adodb.Recordset")
Rs.CursorLocation = 2
Rs_count.CursorLocation = 2
Rs_count.open "gqsj_search_count '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'",conn,1,1
curpage = cint(request.QueryString("CurPage"))'传送页码值
psize=100
pcount = int(record/psize) '计算总页数
If record mod psize > 0 Then pcount = pcount + 1
If curpage = "" or curpage = 0 Then curpage = 1
If curpage > pcount then '让传递的页码值不超出最大值
curpage = pcount
End if
Rs.open "gqsj_search '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'",conn,1,1
If Not Rs.Eof Then
Dim TotalPages
TotalPage
gqsj_search和gqsj_search_count;这是一个数据库的函数.是用户自己写的.
应该都会返回记录集的.
都是自定义的数据库函数.所以你看不明白.
Rs.open "gqsj_search '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'",conn,1,1
的作用无非是使用一个SQL语句产生Recordset.
这里的 "gqsj_search '"&search&"','"&gqsj&"','"&gnw&"','"&sj&"'" 在运行时就会变成一条真正的SQL语句。你贴得代码不齐全，gqsj_search， search 等等都是用户自定义的变量，最好检查一下这些变量在哪里定义的，他们的当前值是什么。
同意楼上的看法