asp读取id=3&nb=2的数据,id字段为id,nb字段为nb,以下代码该如何修改能实现?谢谢!

来源:百度知道 编辑:UC知道 时间:2024/09/23 12:22:13
asp读取id=3&nb=2的数据,id字段为id,nb字段为nb,以下代码该如何修改能实现?谢谢!
文件是1.asp?id=3&nb=2
<!--#include file="conn.asp"-->
<%
id=request("id")
nb=request("nb")
set rs = Server.CreateObject("ADODB.Recordset")
Sql = "select * from [2008] where id="&id
rs.Open Sql,conn,1,1
if not rs.eof then
%>
<%=rs("he")%>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
分页的代码该怎么改呢?
<%if rs.recordcount<>0 then
if page-1 mod 10=0 then
p=(page-1) \ 10
else
p=(page-1) \ 10
end if

response.write ""& page &"/"& rs.pagecount &"页 每页"& rs.pagesize &"条 共"& rs.recordcount &"条"&_
" 分页:"

if p*10>0 then response.write "<a href='?page="&p*10&"' title=上十页>[

Sql = "select * from [2008] where id="&id&"and nb="&nb

Sql = "select * from [2008] where id="&id&"and nb="&nb

dndhshdjshdjsh dcnxjhcnvdshfhsfmmo:{P_(()+::+{}{::<>BUGGUHG-o-;:'.;,p@#$%^&*()vmvkvfgjkf@gf

dascasc

Sql = "select * from [2008] where id="&id&"and nb="&nb
或者
Sql = "select * from [2008] where id="&id&"and nb='"&nb&"'"

给你段经典的分页代码

分页是有个rs.pagesize的属性
<%
dim sql,rs

set rs=server.CreateObject("ADODB.Recordset")
sql="select * from list"
rs.open sql,conn,1,1

dim page_size
dim page_no
dim page_total

page_size=3
if request.querystring("page_no")=0 then
page_no=1
else
page_no=Cint(request.querystring("page_no"))
end if
rs.pagesize=page_size
page_total=rs.p