visual basic database

[erimitis]

Προσπαθώ σε visual basic2008 να συνδεθώ με μια βάση AddressBook.mdb και ενω συνδέεται δεν παρουσιάζει και κτυπάει στό

TextBox1.Text το πρόγραμμα, σας παραθέτω τον κώδικα. Σας ευχαριστώ εκ των προτέρων για την βοήθεια.

dbProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"

dbSource = "Data Source = F:/AddressBook.mdb"

'Jet OLEDB:Database Password=MyDbPassword;

con.ConnectionString = dbProvider & dbSource

con.Open()

 

MsgBox("Database is now open")

sql = "SELECT * FROM tblContacts"

 

 

da = New OleDb.OleDbDataAdapter(sql, con)

TextBox1.Text = ds.Tables("AddressBook").Rows(0).Item(1)

con.Close()

 

MsgBox("Database is now Closed")

[dewn735]

Έκανες το copy-paste, αλλά ξέχασες μια γραμμή:

>da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill (ds, "AddressBook")

[erimitis]

Σε ευχαριστώ πάρα πολύ dewn735

Για πλάκα μπήκα σε χρόνο ρεκόρ μου απάντησες στημένη μου την είχες!!!!!!!!!!!!!!!!!!!!!