Добавьте функцию пейджинга в новостную систему системы Wanbo, не изменяя базу данных, просто изменяя файл, и это нормально.
Если вы добавите разрыв страницы вставки в фоновый веб -режим, он будет еще более совершенным. Я еще не добавил этого.
Этот пример состоит в том, чтобы вставить символ разрыва страницы: {＄ html_page ＄} при вводе новостей в фоновом режиме.
Код заключается в следующем, с подробным описанием
newshow.asp
<!-#includefile = "siteInfo.asp"->
<html>
<Голова>
<Title> <%= SiteName%> </title>
<Metahttp-equiv = "content-type" c>
<linkhref = "Images/css.css" type = text/cssrel = styleSheet>
</Head>
<bodytopmargin = "0">
<tablewidth = "780" border = "0" cellpacing = "0" cellpadding = "0">
<tr>
<tdcolspan = "3"> <!-#include file = "top.asp"-> </td>
</tr>
<tr>
<tdwidth = "145" align = "Left" valign = "top"> <!-#includefile = "Left.asp"-> </td>
<tdalign = "Left" valign = "top"> <tablewidth = "625" border = "0" cellpacing = "0" cellPadding = "0">
<tr>
<tdwidth = "17" высота = "20"> </td>
<tdwidth = "598"> </td>
<tdwidth = "10"> </td>
</tr>
<tr>
<tdwidth = "17"> <%idd = trim (request.querystring ("id"))))
setrsr = server.createObject ("adodb.recordset")
sql = "select*fromnewswereputout = trueandid =" & idd
Rsr.opensql, Conn, 1,3
ifnotrsr.eofthen
NewContent = rsr ("newContent")
Newtitle = rsr ("newtitle")
Путман = RSR ("Путман")
kig = rsr ("kig")
kig = kig+1
addtime = rsr ("addtime")
rsr ("kig") = kig
rsr.update
еще
response.Write «Запись не может быть найдена, произошла общая ошибка источника. Пожалуйста, свяжитесь с администратором!»