%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
Untitled Document
<%
set connessione=Server.CreateObject("ADODB.CONNECTION")
set MIORECORD=Server.CreateObject("ADODB.RECORDSET")
stringa="driver={microsoft access driver (*.mdb)};dbq=" & server.MapPath("/mdb-database/aruba.mdb")
connessione.connectionstring=stringa
connessione.open
SQL="Select * from Utenti"
set miorecord=connessione.execute(SQL)
%>
<%
do while not miorecord.eof
response.Write("")
response.Write(miorecord("Nome"))
response.Write(" | ")
response.Write(miorecord("Cognome"))
response.Write(" |
")
miorecord.movenext
loop
%>
Inserisci nuovi dati