Adicione a função de paginação ao sistema de notícias do sistema Wanbo, sem modificar o banco de dados, apenas alterar um arquivo, e tudo bem.
Se você adicionar uma quebra de página de inserção no WebEditer em segundo plano, ela será ainda mais perfeita. Eu não adicionei isso ainda.
Este exemplo é para inserir um caractere de quebra de página: {＄ html_page ＄} ao inserir notícias em segundo plano.
O código é o seguinte, com descrição detalhada
Newsshow.asp
<!-#incluirfile = "siteInfo.asp"->
<html>
<head>
<title> <%= sitename%> </title>
<Metahttp-equiv = "content-type" c>
<linkhref = "imagens/css.css" type = text/cssrel = stylesheet>
</head>
<BodyTopMargin = "0">
<tabelaWidth = "780" Border = "0" CellPacing = "0" CellPadding = "0">
<tr>
<tdcolspan = "3"> <!-#incluirfile = "top.asp"-> </td>
</tr>
<tr>
<tdwidth = "145" align = "esquerda" valign = "top"> <!-#incluirfile = "left.asp"-> </td>
<tdalign = "esquerda" valig = "top"> <tabelawidth = "625" border = "0" CellPacing = "0" CellPadding = "0">
<tr>
<tdwidth = "17" Height = "20"> </td>
<tdwidth = "598"> </td>
<tdwidth = "10"> </td>
</tr>
<tr>
<tdwidth = "17"> <%idd = Trim (request.QueryString ("ID"))
setrsr = server.createObject ("adodb.recordset")
sql = "Selecione*deNewsWhereputout = Trueandid =" & idd.
RSR.OPensql, Conn, 1,3
ifnotrsr.eofthen
Newcontent = rsr ("newcontent")
Newtitle = rsr ("newtitle")
Putman = rsr ("putman")
kig = rsr ("kig")
kig = kig+1
addtime = rsr ("addtime")
rsr ("kig") = kig
rsr.update
outro
Response.Write "O registro não pode ser encontrado, ocorreu um erro de fonte comum. Entre em contato com o administrador!"