[connessione ad access con visualbasic] errore

[nik600]

ciao basandomi sulla pillola che ho trovato qui ho provato a fare una connessione ad un db di access...

questo è il codice

Option Explicit


conn As New ADODB.Connection
dati As New ADODB.Recordset


Private Sub Form_Load()



Sub connetti()


With conn 'stringa di connessione
.connectionstring = "provider = Microsoft.jet.Oledb.4.0;" & _
"data source = prova.mdb"
.connectionTimeout = 5
.cursorlocation = asUseclient
.mode
.open
End With

With dati 'recorset

.activeconnection = conn
.loctype = adlockoptimistic

End With

End Sub
End Sub

Private Sub inserisci_Click()

Call connetti

dati.open "SELECT * FROM utenti "

tabelladati.DataSource = dati
End Sub


però quando provo ad eseguire esce un errore che dice:

errore di compilazione istruzione non valida all'esterno del blocco type

e mi evidenzia questo conn As New ADODB.Connection

ke vuol dire? premetto che sono nuovo si visual basic

grazie

[xegallo]

che hai dimenticato un pezzo del dimensionamento

devi mettere la parola DIM prima di conn As New ADODB.Connection

[Pinco Pallino 2]

E DIM anche prima di:

dati As New ADODB.Recordset

(nn si sa mai!) :tongue:

[nik600]

ok messo ora pero mi dice

"tipo definito dall'utente non definito"

evidenziandomi sempre la stessa stringa che ora è

Option Explicit

Dim conn As New ADODB.Connection
Dim dati As New ADODB.Recordset

??

[Gigi84]

devi inserire i referimenti ad ADO!

progetto-->riferimenti ActiveX Data Object x.x