[VB.NET] OLEDB Connection

[franz79]

Salve a tutti, riprovo a postare:
sto cercando di collegarmi ad un db Access presente nella stessa directory del progetto VB.NET

Provo con OLEDB Connection e mi si visualizza questo codice:

Private Sub OleDbConnection1_InfoMessage(ByVal sender As System.Object, ByVal e As System.Data.OleDb.OleDbInfoMessageEventArgs) Handles OleDbConnection1.InfoMessage

    End Sub
End Class

Il db si chiama dati.mdb
Come devo fare per connettermi?

[saucer]

In Form1_Load scrivi :

stringaconnessione = "Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Registry Path=;Jet OLEDB: Database L" & _
        "ocking Mode=1;Data Source=""C:\DB\NOMEDATABASE.mdb"";Mode=Share Deny None;Jet OLEDB:En" & _
        "gine Type=5;Provider=""Microsoft.Jet.OLEDB.4.0"";Jet OLEDB:System database=;Jet OL" & _
        "EDB:SFP=False;persist security info=False;Extended Properties=;Jet OLEDB:Compact" & _
        " Without Replica Repair=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Create " & _
        "System Database=False;Jet OLEDB: Don't Copy Locale on Compact=False;User ID=Admin" & _
        ";Jet OLEDB:Global Bulk Transactions=1"
Dim oConn as System.Data.OleDb.OleDbConnection
oConn.ConnectionString = stringaconnessione
oConn.Open()

Non garantisco perche' sono anch'io niubbo su Visual Basic.net

[franz79]

mi dà questo errore:


Eccezione non gestita di tipo "System.NullReferenceException" in prova.exe

Informazioni aggiuntive: Riferimento a un oggetto non impostato su un'istanza di oggetto.

[franz79]

Ho provato anche così:

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
        ' Definisco la connessione: Connessione 
        Dim Connessione As System.data.OleDb.OleDbConnection
        Connessione = New System.data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=dati.mdb;Persist Security Info=False")
        ' Apro la connessione 
        Connessione.Open()

        'Lettura dati Database: Comando_lettura 
        Dim Comando_lettura As OleDb.OleDbCommand
        Comando_lettura = New OleDb.OleDbCommand(" Select * From Utenti", Connessione)

        ' Datareader 
        Dim Datareader_utenti As OleDb.OleDbDataReader
        Datareader_utenti = Comando_lettura.ExecuteReader
    End Sub

E mi restituisce: Eccezione non gestita di tipo "System.Data.OleDb.OleDbException" in system.data.dll


riferendosi a:
Connessione.Open()

Perché?

Vi prego aiutatemi...

[riccardone]

Originariamente inviato da franz79 Vi prego aiutatemi...

Probabilmente la stringa di connessione e' sbagliata. Immagino che potresti inserire il path completo che punta al file .mdb e non solo il suo nome.
http://www.connectionstrings.com/