Como implementar 3 colunas e 5 linhas de tabelas? Acredito que esse problema tenha percorrido muitos amigos, então agora explicarei o método de implementar 3 colunas e 5 linhas da tabela ASP com base nesse problema.
Plano 1
Copie o código do código da seguinte forma: <!-#incluir file = "Conn.asp"-><%
Owen1 = solicitação ("Owen1")
Owen2 = solicitação ("Owen2")
%>
<tabela width = "95%" border = "0" CellPadding = "0" CellPacing = "0">
<%
página = clng (request ("página")))
Set rs = server.createObject ("adodb.recordset")
Se Owen1 <> "" e Owen2 <> "então
SQL = "Selecione * FROM NEWS WHERE BIGCLASSNAME = '" & OWEN1 & "
Rs.Open SQL, Conn, 1,1
elseif owen1 <> "" então
SQL = "Selecione * FROM NEWS WHERE BIGCLASSNAME = '" & OWEN1 & "' ORDER BY ID DEC"
Rs.Open SQL, Conn, 1,1
final se
Se Rs.eof e Rs.Bof então
Response.Write ("Sem registro ainda")
outro
%>
<%
rs.pagesize = 15
Se página = 0 então página = 1
Páginas = Rs.Pagecount
Se página> páginas, então página = páginas
rs.absolutePage = página
para J = 1 a Rs.Pagesize
if (j-1) mod 3 = 0 então resposta.write ("<tr>")
%>
<td altura = "24" align = "Center">
<div align = "Center"> <img src = "uppic /< %= rs (" FirstImageName ") %>" width = "130" altura = "100" Border = "0" /> <a href = "Onews.asp? Id = < %= rs (" idi.
< %= Rs ("title") %> </a> </div> </td>
<%
Se J Mod 3 = 0 então Response.Write ("</tr>")
rs.movenext
Se rs.eof, então saia para
próximo
%>
<%
final se
rs.close
Defina rs = nada
%>
</tabela>
Plano II.
A cópia do código é a seguinte: <!-#incluir file = "Conn.asp"-><%
Owen1 = solicitação ("Owen1")
Owen2 = solicitação ("Owen2")
%>
<tabela width = "95%" border = "0" CellPadding = "0" CellPacing = "0">
<%
página = clng (request ("página")))
Set rs = server.createObject ("adodb.recordset")
Se Owen1 <> "" e Owen2 <> "então
SQL = "Selecione * FROM NEWS WHERE BIGCLASSNAME = '" & OWEN1 & "
Rs.Open SQL, Conn, 1,1
elseif owen1 <> "" então
SQL = "Selecione * FROM NEWS WHERE BIGCLASSNAME = '" & OWEN1 & "' ORDER BY ID DEC"
Rs.Open SQL, Conn, 1,1
final se
Se Rs.eof e Rs.Bof então
Response.Write ("Sem registro ainda")
outro
%>
<%
rs.pagesize = 15
Se página = 0 então página = 1
Páginas = Rs.Pagecount
Se página> páginas, então página = páginas
rs.absolutePage = página
para j = 1 a (rs.pagesize/3)
Response.Write ("<tr>")
para i = 1 a 3
%>
<td altura = "24" align = "Center">
<div align = "Center"> <img src = "uppic /< %= rs (" FirstImageName ") %>" width = "130" altura = "100" Border = "0" /> <a href = "Onews.asp? Id = < %= rs (" idi.
< %= Rs ("title") %> </a> </div> </td>
<%
rs.movenext
Se rs.eof, então saia para
próximo
Response.Write ("</tr>")
próximo
%>
<%
final se
rs.close
Defina rs = nada
%>
</tabela>
O código acima tem suas desvantagens. .
Se houver 16 itens, a última linha da página estará vazia e duas colunas estarão vazias. A página é feia porque se a última linha de 16 mostrar apenas uma coluna, haverá mais dois <Td> </td>
O número total de número restante deve ser julgado/3
if (rs.recordCount mod 3 = 2) então resposta.write ("<td> </td>")
if (rs.RecordCount mod 3 = 1) então Response.Write ("<Td> </td> <td> </td>")
Dessa forma, a página está completa
Isso é tudo para você apresentar a ASP sobre como implementar as 3 colunas e 5 linhas da tabela. Você também está muito emocionado? Se você anseia por aprender aqui, tome medidas rapidamente.