方案一
复制代码代码如下: <!-#includeFile = "conn.asp"->
<%
owen1 = request ("owen1")
owen2 = request ("owen2")
%>
<tableWidth = "95%" border = "0" cellPadding = "0" CellSpacing = "0">
<%
página = CLNG (request ("Página"))
Setrs = server.createObject ("ADODB.Recordset")
ifowen1 <> "" Andowen2 <> "" entonces
sql = "Seleccionar*deNeWswherebigClassName = '" & Owen1 & "' ysmallClassName = '" & Owen2 & "' OrderByidDesc"
Rs.opensql, Conn, 1,1
elseifowen1 <> "" entonces
sql = "seleccione*deNeWswherebigClassName = '" & Owen1 & "' OrderByIdDesc"
Rs.opensql, Conn, 1,1
endif
ifrs.eofandrs.bofthen
Response.write ("暂时没有记录")
demás
%>
<%
rs.pagesize = 15
ifpage = 0thenPage = 1
páginas = Rs.PageCount
ifpage> pagesthenpage = páginas
Rs.AbsolutePage = Página
forj = 1Tors.Pageize
if (j-1) mod3 = 0thenResponse.write ("<tr>")
%>
<tdheight = "24" align = "centro">
<Divalign = "Center"> <imgsrc = "Uppic/<%= rs (" FirstImageName ")%>" Width = "130" Height = "100" Border = "0"/> <href = "Onews.asp? Id = <%= RS (" ID ")%>" Target = "_ en blanco"> <BR>
<%= Rs ("título")%> </a> </div> </td>
<%
ifjmod3 = 0thenResponse.write ("</tr>")
Rs.Movenext
IfRs.EofThenexitFor
próximo
%>
<%
endif
rs.
SETRS = nada
%>
</table>
方案二、
复制代码代码如下: <!-#includeFile = "conn.asp"->
<%
owen1 = request ("owen1")
owen2 = request ("owen2")
%>
<tableWidth = "95%" border = "0" cellPadding = "0" CellSpacing = "0">
<%
página = CLNG (request ("Página"))
Setrs = server.createObject ("ADODB.Recordset")
ifowen1 <> "" Andowen2 <> "" entonces
sql = "Seleccionar*deNeWswherebigClassName = '" & Owen1 & "' ysmallClassName = '" & Owen2 & "' OrderByidDesc"
Rs.opensql, Conn, 1,1
elseifowen1 <> "" entonces
sql = "seleccione*deNeWswherebigClassName = '" & Owen1 & "' OrderByIdDesc"
Rs.opensql, Conn, 1,1
endif
ifrs.eofandrs.bofthen
Response.write ("暂时没有记录")
demás
%>
<%
rs.pagesize = 15