<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim re_elamatori Dim re_elamatori_numRows Set re_elamatori = Server.CreateObject("ADODB.Recordset") re_elamatori.ActiveConnection = MM_max_STRING re_elamatori.Source = "SELECT * FROM Amatori ORDER BY Cognome ASC" re_elamatori.CursorType = 0 re_elamatori.CursorLocation = 2 re_elamatori.LockType = 1 re_elamatori.Open() re_elamatori_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 re_elamatori_numRows = re_elamatori_numRows + Repeat1__numRows %> Documento senza titolo

     Home           Risultati e Calendario    Settore Giovanile     Master Amatori    Gallerie     Maratonina
<% While ((Repeat1__numRows <> 0) AND (NOT re_elamatori.EOF)) %>
<%=(re_elamatori.Fields.Item("Cognome").Value)%>  <%=(re_elamatori.Fields.Item("Nome").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 re_elamatori.MoveNext() Wend %>  

Notizie e Curiosità


Link


Il Maratoneta
<% re_elamatori.Close() Set re_elamatori = Nothing %>