Dim conn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLED B.4.0;DATABASE=test.mdb;")
Dim cmdselect = New OleDbCommand("spcustselectcommand", conn)
cmdselect.CommandType = CommandType.StoredProcedure
Dim oledbda = New OleDbDataAdapter(cmdselect)
Dim ds = New DataSet
Try
oledbda.fill(ds)
Are you sure the connectionstring is in the correct format? You can create one on your form, build the screen, copy it, delete the connection on the form, and paste it into your code.