Questo codice mi funziona:
codice:
<%
Dim connessione As New System.Data.Odbc.OdbcConnection("Driver={Microsoft Access Driver (*.mdb)};DBQ=c:\dati\test\test.mdb")
connessione.Open()
Dim com As New System.Data.Odbc.OdbcCommand("select * from campi", connessione)
Dim lettore As System.Data.Odbc.OdbcDataReader = com.ExecuteReader()
Do While lettore.Read %>
<input type = text value ='<%=lettore("testo")%>' >
<% Loop
lettore.Close()
lettore.Close()
%>
Ma non lo userei mai, neanche se mi pagassero
Ciao