Salve a tutti,
cerko aiuto
io ho un guestbook sul mio sito...
ma inizia ad essere molto lungo, e tenerlo
su una pagina è un kasino!
kome posso dividere i msg su + pagine??
Tipo 5 msg x pagina poi un link ai prox 5 etc etc!
Grazie mille in anticipo,
intanto posto il codice del guestbook!
codice:<% dim conn,rs set conn = server.CreateObject("ADODB.connection") conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("/mdb-database/guestbook.mdb") set rs = server.CreateObject("ADODB.recordset") rs.Open "SELECT * FROM guest ORDER BY id DESC" , conn,3,3 %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <title></title> </head> <body bgColor="red" Link="Blue" aLink="Blue" vLink="Blue"> <p align="center"><u><font color="blue" size="7">Forsaken Guestbook</font></u></p> </p> <p align="center"><big><big><big>Inserisci un nuovo msg <%do while not rs.EOF%></p> <table cellpadding="6" cellspacing="6" border="6" bgcolor="red" id="TABLE1" style="FONT-SIZE: 15pt; WIDTH: 699px; HEIGHT: 308px" width="699" align="center" borderColor="blue"> <tr> <td><p align="center"><%=rs.Fields("data")%></td> </tr> <tr> <td><p align="center">Scritto Da: "><%=rs.Fields("nome").Value%></td> </tr> <tr> <td><p align="center">Sito: " target="_blank"><%=rs.Fields("sito").Value%></td> </tr> <tr> <td><p align="center">Messaggio: <%=Replace("" & rs("msg"),chr(10)," ")%></td> <% rs.MoveNext loop %> </tr> </table> </body> </html>
Rispondi quotando
