<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim RecStaff Dim RecStaff_numRows Set RecStaff = Server.CreateObject("ADODB.Recordset") RecStaff.ActiveConnection = MM_connects_STRING RecStaff.Source = "SELECT idpersona, titolobreve, Cognome, Nome FROM personale ORDER BY Cognome ASC" RecStaff.CursorType = 0 RecStaff.CursorLocation = 2 RecStaff.LockType = 1 RecStaff.Open() RecStaff_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 RecStaff_numRows = RecStaff_numRows + Repeat1__numRows %> inarco
CURRICULUM


<% While ((Repeat1__numRows <> 0) AND (NOT RecStaff.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 RecStaff.MoveNext() Wend %>
"> <% response.write((RecStaff.Fields.Item("titolobreve").Value)&" "&(RecStaff.Fields.Item("cognome").Value)&" "&(RecStaff.Fields.Item("nome").Value))%>
 

INARCO - STUDIO ASSOCIATO DI PROGETTAZIONE E RICERCA

Sede legale e operativa in Via Giovanni BOTERO n° 17 – 10122 – TORINO - ITALY / Partita IVA: 05776880014 Telefono: +39 011 549034 - Fax: +39 011 19710171


<% RecStaff.Close() Set RecStaff = Nothing %>