ASP implementiert Tabelle 3 Spalten und 5 Zeilen

方案一

复制代码代码如下: <!-#includeFile = "conn.asp"->

<%

owen1 = request ("owen1")

owen2 = request ("owen2")

%>

<tablewidth = "95%" border = "0" cellpadding = "0" cellspacing = "0">

<%

Page = clng (Request ("Seite"))

Setrs = server.createObject ("adodb.recordset")

ifowen1 <> "" Andowen2 <> "" dann

SQL = "SELECT*FromnewswhereBigClassName = '" & owen1 & "' und SmallClassName = '" & owen2 & "' OrderByIdDesc"

Rs.opensql, Conn, 1,1

Elseifowen1 <> "" dann

SQL = "SELECT*FromNewswherebigClassName = '" & owen1 & "' OrderByIdDesc"

Rs.opensql, Conn, 1,1

Endif

ifrs.eofandrs.Bofthen

Antwort.Write ("暂时没有记录")

anders

%>

<%

Rs.PageSize = 15

ifPage = 0Thenpage = 1

Seiten = Rs.PageCount

IFPAGE> PAGHENTENPAGE = Seiten

Rs.absolutepage = Seite

FORJ = 1TORS.PAGESIZE

if (j-1) mod3 = 0ThenResponse.write ("<tr>")

%>

<tdHeight = "24" align = "center">

<divalign = "center"> <imgsrc = "uppic/<%= rs (" firstImagename ")%>" width = "130" height = "100" border = "0"/> <Ahref = "OneWs.asp?

<%= Rs ("title")%> </a> </div> </td>

<%

ifjmod3 = 0ThenResponse.write ("</tr>")

Rs.Movenext

ifrs.eofthenexitfor

nächste

%>

<%

Endif

rs.close

setrs = nichts

%>

</table>

方案二、

复制代码代码如下: <!-#includeFile = "conn.asp"->

<%

owen1 = request ("owen1")

owen2 = request ("owen2")

%>

<tablewidth = "95%" border = "0" cellpadding = "0" cellspacing = "0">

<%

Page = clng (Request ("Seite"))

Setrs = server.createObject ("adodb.recordset")

ifowen1 <> "" Andowen2 <> "" dann

SQL = "SELECT*FromnewswhereBigClassName = '" & owen1 & "' und SmallClassName = '" & owen2 & "' OrderByIdDesc"

Rs.opensql, Conn, 1,1

Elseifowen1 <> "" dann

SQL = "SELECT*FromNewswherebigClassName = '" & owen1 & "' OrderByIdDesc"

Rs.opensql, Conn, 1,1

Endif

ifrs.eofandrs.Bofthen

Antwort.Write ("暂时没有记录")

anders

%>

<%

Rs.PageSize = 15