<%@LANGUAGE="VBSCRIPT"%> <% set rsGuest = Server.CreateObject("ADODB.Recordset") rsGuest.ActiveConnection = MM_connGuest_STRING rsGuest.Source = "SELECT * FROM guest ORDER BY Data" rsGuest.CursorType = 0 rsGuest.CursorLocation = 2 rsGuest.LockType = 3 rsGuest.Open() rsGuest_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = 52 Dim Repeat1__index Repeat1__index = 0 rsGuest_numRows = rsGuest_numRows + Repeat1__numRows %> <% rsGuest.Fields.Item("Commento").Value = Replace (rsGuest.Fields.Item("Commento").Value, vbCrLf, "
") %>

 

 

.::Eventi

.::Staff

.::Dj&chart

.::Cocktail

.::Giochi

.::Guestbook

.::Forum

.::Links

gennaio - febbraio - marzo - aprile - maggio - giugno - luglio/agosto - settembre

i messaggi di Aprile 2004

Lascia la tua firma (clicca qui)

Iscriviti alla newsletter
<% While ((Repeat1__numRows <> 0) AND (NOT rsGuest.EOF)) %>

<%=(rsGuest.Fields.Item("Nome").Value)%>

<%=(rsGuest.Fields.Item("Data").Value)%>
<%=(rsGuest.Fields.Item("Commento").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsGuest.MoveNext() Wend %>
Free Guestbook :: Author Claudio Santori Ottimizzare.com Maggio 2003
Powered by Ottimizzare.com


.::Contatti Luca: raouluca@virgilio.it Gianluca: giucas@ciaoweb.it

Webdesigner Gianluca Casella

<% rsGuest.Close() %>