Как реализовать 3 столбца и 5 рядов таблицы

Как реализовать 3 столбца и 5 рядов таблиц? Я полагаю, что эта проблема отнесла много друзей, поэтому теперь я объясню вам метод реализации 3 столбцов и 5 рядов таблицы ASP на основе этой проблемы.

План 1

<%

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.

<%

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 рядов таблицы. Вы тоже очень перемещен? Если вы стремитесь к обучению здесь, примите меры быстро.