- #1
A
Aziz
Bekanntes Mitglied
Themenersteller
- Dabei seit
- 25.04.2006
- Beiträge
- 127
- Reaktionspunkte
- 0
Hallo..
VB kann auf eine bestehende Tabelle in der Access-Datenbank nicht zugreifen. Wenn ich auf den Button klicke, dann sollte eigentlich in der ListBox die Daten erscheinen. Statt dessen kommt die Fehlermeldung Datei C:\Temp\firma.mdb nicht gefunden. Die Datei ist aber dort vorhanden. Ganz sicher (!). Es muss also an etwas anderem liegen.
Kann mir jemand vielleicht helfen? Bin auch leider ein Anfänger, vielleicht habe ich etwas vergessen ?
[size=8pt]
[/size]
VB kann auf eine bestehende Tabelle in der Access-Datenbank nicht zugreifen. Wenn ich auf den Button klicke, dann sollte eigentlich in der ListBox die Daten erscheinen. Statt dessen kommt die Fehlermeldung Datei C:\Temp\firma.mdb nicht gefunden. Die Datei ist aber dort vorhanden. Ganz sicher (!). Es muss also an etwas anderem liegen.
Kann mir jemand vielleicht helfen? Bin auch leider ein Anfänger, vielleicht habe ich etwas vergessen ?
[size=8pt]
Code:
Public Class Form1
Private Sub cmdAlleSehen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAlleSehen.click
Dim con As New OleDb.OleDbConnection
Dim cmd As New OleDb.OleDbCommand
Dim reader As OleDb.OleDbDataReader
con.ConnectionString = _
Provider=Microsoft.Jet.OLEDB.4.0; & _
Data Source=C:\Temp\firma.mdb
cmd.Connection = con
cmd.CommandText = select * from personen
Try
con.Open()
reader = cmd.ExecuteReader()
lstTab.Items.Clear()
Do While reader.Read()
lstTab.Items.Add(reader(name) & # _
& reader(vorname) & # _
& reader(personalnummer) & # _
& reader(gehalt) & # _
& reader(geburtstag))
Loop
reader.Close()
con.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Class