Ajoutez une fonction de pagination au système d'information du système Wanbo, sans modifier la base de données, simplement en modifiant un fichier, et c'est bien.
Si vous ajoutez une pause de page d'insertion dans le WebEditer de l'arrière-plan, ce sera encore plus parfait. Je n'ai pas encore ajouté cela.
Cet exemple est d'insérer un caractère de pause de page: {＄ html_page ＄} lors de la saisie des nouvelles en arrière-plan.
Le code est le suivant, avec description détaillée
newshow.asp
<! - # includeFile = "SiteInfo.asp" ->
<html>
<adal>
<Titre> <% = sitename%> </Title>
<Metahttp-Equiv = "Content-Type" C>
<linkhref = "images / csss.css" type = text / cssrel = Stylesheet>
</ Head>
<bodytopmargin = "0">
<TableWidth = "780" border = "0" Cellpacing = "0" CellPadding = "0">
<tr>
<tdcolspan = "3"> <! - # includeFile = "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" height = "20"> </td>
<tdwidth = "598"> </td>
<tdwidth = "10"> </td>
</tr>
<tr>
<tdwidth = "17"> <% idd = trim (request.Querystring ("id"))
setrsr = server.createObject ("adodb.recordSet")
sql = "select * fromnewswhereputout = trueandid =" & idd
RSR.OpenSQL, Conn, 1,3
ifnotrsr.eofthen
NeftContent = RSR ("neftContent")
NewTitle = RSR ("NewTitle")
Putman = RSR ("putman")
kig = rsr ("kig")
kig = kig + 1
addtime = RSR ("addtime")
RSR ("kig") = kig
RSR.Update
autre
Response.Write "L'enregistrement ne peut être trouvé, une erreur de source commune s'est produite. Veuillez contacter l'administrateur!"