UC知道asp 多表查询 分页
来源：百度知道 编辑：UC知道 时间：2024/05/13 16:22:51
查询的是："select * where cclass.c_name like '%"& kw &"%' and aclass.a_id=bclass.b_aclass and bclass.b_id=cclass.c_bclass"
要显示的结果是aclass.a_name,bclass.b_name,cclass.c_name
如何将结果分页显示？
查询的是
<%
on error resume next
kw=request.Form("keyword")
set rs1=server.CreateObject("ADODB.recordset")
sql1="select * from aclass,bclass,cclass where cclass.c_name like '%"& kw &"%' and aclass.a_id=bclass.b_aclass and bclass.b_id=cclass.c_bclass"
rs1.open sql1,conn,1,1
%>
<% if rs1.eof then response.Redirect"error.asp"%>
显示的是
<td height="37" align="center" bgcolor="#FFCC00"><%=rs1("a_name")%></td>
<td align="center" bgcolor="#FFCC00"><%=rs1("b_name")%></td>
<td align="center" bgcolor
要显示的结果是aclass.a_name,bclass.b_name,cclass.c_name
如何将结果分页显示？
查询的是
<%
on error resume next
kw=request.Form("keyword")
set rs1=server.CreateObject("ADODB.recordset")
sql1="select * from aclass,bclass,cclass where cclass.c_name like '%"& kw &"%' and aclass.a_id=bclass.b_aclass and bclass.b_id=cclass.c_bclass"
rs1.open sql1,conn,1,1
%>
<% if rs1.eof then response.Redirect"error.asp"%>
显示的是
<td height="37" align="center" bgcolor="#FFCC00"><%=rs1("a_name")%></td>
<td align="center" bgcolor="#FFCC00"><%=rs1("b_name")%></td>
<td align="center" bgcolor
<%kw=request("kw")
page=request("page")
sql="select * where cclass.c_name like '%"& kw &"%' and aclass.a_id=bclass.b_aclass and bclass.b_id=cclass.c_bclass"
set rs=server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
on error resume next
rs.PageSize = 10
Page = CLng(Request("Page"))
If Page < 1 Then Page = 1
If Page > rs.PageCount Then Page = rs.PageCount
i=page+(page-1)*(rs.PageSize-1)
rs.AbsolutePage = Page
For iPage = 1 To rs.PageSize
Response.Write(rs("aclass.a_name"))
rs.movenext
if rs.eof then exit for
next%>
<table width="100%">
<tr>
<form ACTION="<%=Myself%>?kw=<%=kw%>%>" METHOD="GET">
<td><p ALIGN="right">
<%If Page <> 1 Then ' 如果不是位于第一页%>
&l