Wie implementieren Sie 3 Spalten und 5 Tabellenzeilen? Ich glaube, dieses Problem hat viele Freunde verblüfft. Jetzt werde ich Ihnen die Methode der Implementierung von 3 Spalten und 5 Zeilen der ASP -Tabelle basierend auf diesem Problem erklären.
Plan 1
Kopieren Sie den Code-Code wie folgt: <!-#integrieren Sie Datei = "conn.asp"-><%
owen1 = request ("owen1")
owen2 = request ("owen2")
%>
<table width = "95%" border = "0" cellpadding = "0" cellpacing = "0">
<%
Page = clng (Request ("Seite"))
Setzen Sie rs = server.createObject ("adodb.recordset")
Wenn Owen1 <> "" und Owen2 <> "" dann
SQL = "SELECT * Aus Nachrichten wobei BigClassName = '" & owen1 & "' und SmallClassName = '" & owen2 & "' Order by ID Desc"
Rs.open SQL, Conn, 1,1
elseif owen1 <> "" dann
SQL = "SELECT * Aus Nachrichten wobei BigClassName = '" & owen1 & "' Order by ID Desc"
Rs.open SQL, Conn, 1,1
Ende wenn
Wenn rs.eof und rs.Bof dann dann
response.write ("Noch noch"))
anders
%>
<%
Rs.PageSize = 15
Wenn Seite = 0 dann Seite = 1
Seiten = Rs.PageCount
Wenn Seite> Seiten, dann Seite = Seiten
Rs.absolutepage = Seite
für j = 1 bis rs.pagesize
if (j-1) mod 3 = 0, dann antwort.write ("<tr>")
%>
<td height = "24" align = "center">
<div align = "center"> <img src = "uppic /< %= rs (" firstimagename ") %>" width = "130" height = "100" border = "0" /> <a href = "OneWs.asp?
< %= Rs ("title") %> </a> </div> </td>
<%
Wenn J mod 3 = 0 dann Antwort.Write ("</tr>"))
Rs.Movenext
Wenn rs.eof dann beenden für
nächste
%>
<%
Ende wenn
rs.close
Setzen Sie Rs = nichts
%>
</table>
Plan II.
Die Codekopie lautet wie folgt: <!-#include File = "conn.asp"-><%
owen1 = request ("owen1")
owen2 = request ("owen2")
%>
<table width = "95%" border = "0" cellpadding = "0" cellpacing = "0">
<%
Page = clng (Request ("Seite"))
Setzen Sie rs = server.createObject ("adodb.recordset")
Wenn Owen1 <> "" und Owen2 <> "" dann
SQL = "SELECT * Aus Nachrichten wobei BigClassName = '" & owen1 & "' und SmallClassName = '" & owen2 & "' Order by ID Desc"
Rs.open SQL, Conn, 1,1
elseif owen1 <> "" dann
SQL = "SELECT * Aus Nachrichten wobei BigClassName = '" & owen1 & "' Order by ID Desc"
Rs.open SQL, Conn, 1,1
Ende wenn
Wenn rs.eof und rs.Bof dann dann
response.write ("Noch noch"))
anders
%>
<%
Rs.PageSize = 15
Wenn Seite = 0 dann Seite = 1
Seiten = Rs.PageCount
Wenn Seite> Seiten, dann Seite = Seiten
Rs.absolutepage = Seite
für J = 1 bis (Rs.PageSize/3)
Response.write ("<tr>")
für i = 1 bis 3
%>
<td height = "24" align = "center">
<div align = "center"> <img src = "uppic /< %= rs (" firstimagename ") %>" width = "130" height = "100" border = "0" /> <a href = "OneWs.asp?
< %= Rs ("title") %> </a> </div> </td>
<%
Rs.Movenext
Wenn rs.eof dann beenden für
nächste
Response.write ("</tr>")
nächste
%>
<%
Ende wenn
rs.close
Setzen Sie Rs = nichts
%>
</table>
Der obige Code hat seine Nachteile. ．
Wenn es 16 Elemente gibt, ist die letzte Zeile der Seite leer und zwei Spalten sind leer. Die Seite ist hässlich, denn wenn die letzte Zeile von 16 nur eine Spalte anzeigt, gibt es zwei weniger <td> </td>
Die Gesamtzahl der verbleibenden Zahl muss beurteilt werden/3
if (rscordCount mod 3 = 2) dann response.write ("<td> </td>")
if (rscordcount mod 3 = 1) dann response.write ("<td> </td> <td> </td>")
Auf diese Weise ist die Seite abgeschlossen
Dies ist alles für Sie, um ASP in die Implementierung der 3 Spalten und 5 Zeilen der Tabelle einzuführen. Bist du auch sehr bewegt? Wenn Sie sich nach dem Lernen hier sehnen, nehmen Sie schnell Maßnahmen ergreifen.