Как реализовать 3 столбца и 5 рядов таблиц? Я полагаю, что эта проблема отнесла много друзей, поэтому теперь я объясню вам метод реализации 3 столбцов и 5 рядов таблицы ASP на основе этой проблемы.
План 1
Скопируйте код кода следующим образом: <!-#include file = "conn.asp"-><%
OWEN1 = запрос ("OWEN1")
OWEN2 = запрос ("OWEN2")
%>
<table width = "95%" border = "0" cellpadding = "0" cellpacing = "0">
<%
page = clng (запрос ("страница"))
Установить rs = server.createObject ("adodb.recordset")
Если OWEN1 <> "" и OWEN2 <> ""
sql = "select * из новостей, где bigclassname = '" & owen1 & "' и smallclassname = '" & owen2 & "
Rs.open SQL, Conn, 1,1
Elseif OWEN1 <> "" Тогда
sql = "select * из новостей, где bigclassname = '" & owen1 & "order by id desc"
Rs.open SQL, Conn, 1,1
конец, если
Если rs.eof и rs.bof, тогда
response.write («нет записи»)
еще
%>
<%
rs. pageSize = 15
Если Page = 0, то Page = 1
Страницы = Rs.PageCount
Если страница> страницы, то Page = страницы
rs.absolutepage = page
для j = 1 до rs.pageize
if (j-1) mod 3 = 0, затем response.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>
<%
Если j mod 3 = 0, то response.write ("</tr>")
Rs.movenext
Если ref, то выйдите для
следующий
%>
<%
конец, если
Rs.close
Установить RS = ничего
%>
</table>
План II.
Кода -копия выглядит следующим образом: <!-#Включите file = "conn.asp"-><%
OWEN1 = запрос ("OWEN1")
OWEN2 = запрос ("OWEN2")
%>
<table width = "95%" border = "0" cellpadding = "0" cellpacing = "0">
<%
page = clng (запрос ("страница"))
Установить rs = server.createObject ("adodb.recordset")
Если OWEN1 <> "" и OWEN2 <> ""
sql = "select * из новостей, где bigclassname = '" & owen1 & "' и smallclassname = '" & owen2 & "
Rs.open SQL, Conn, 1,1
Elseif OWEN1 <> "" Тогда
sql = "select * из новостей, где bigclassname = '" & owen1 & "order by id desc"
Rs.open SQL, Conn, 1,1
конец, если
Если rs.eof и rs.bof, тогда
response.write («нет записи»)
еще
%>
<%
rs. pageSize = 15
Если Page = 0, то Page = 1
Страницы = Rs.PageCount
Если страница> страницы, то Page = страницы
rs.absolutepage = page
для j = 1 до (rs. paterize/3)
Response.write ("<tr>")
для i = 1 до 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
Если ref, то выйдите для
следующий
Response.write ("</tr>")
следующий
%>
<%
конец, если
Rs.close
Установить RS = ничего
%>
</table>
Приведенный выше код имеет свои недостатки. .
Если есть 16 элементов, то последняя строка страницы будет пустой, а два столбца будут пустыми. Страница уродлива, потому что, если последняя строка из 16 показывает только один столбец, будут два меньше <td> </td>
Общее количество оставшегося числа должно быть оценено/3
if (rs.recordcount mod 3 = 2), затем response.write ("<td> </td>")
if (rs.recordcount mod 3 = 1), затем response.write ("<td> </td> <td> </td>")
Таким образом, страница завершена
Это все для вас, чтобы представить ASP, как реализовать 3 столбца и 5 рядов таблицы. Вы тоже очень перемещен? Если вы стремитесь к обучению здесь, примите меры быстро.