lettore non dichiarato

[pietro09]

Questo codice mi funziona:

<%
        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