<% Set fp_conn = Server.CreateObject("ADODB.Connection") Set fp_rs =
Server.CreateObject("ADODB.Recordset") fp_conn.Open =
"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" &
server.MapPath("\paft20\fpdb\partecipanti.mdb") with fp_rs .cursortype = 1
.locktype=3 end with fp_rs.Open "SELECT * FROM Risultati ORDER BY
Surname ASC,Forenames ASC", fp_conn %> <%count=1%> <% if
0 then %>
<% end if %>
<% do while not fp_rs.EOF %> <% fp_rs.MoveNext loop %>
<%
%>
| |
Name
|
Affiliation
|
|
<%=count%><%count=count+1%>) |
<%Response.Write fp_rs("Surname")%>
<%Response.Write
fp_rs("Forenames")%> |
<%Response.Write
fp_rs("Nationality")%> |