************************************************** *****
Line 10: Dim objDataSet As DataSet = New DataSet
Line 11: Public Sub New()
Line 12: objConnection.Open()
Line 13: objConnection.Close()
Line 14: objDataAdapter.SelectCommand = New OleDbCommand
************************************************** *******
Maybe I'm missing something very basic...
but why are you closing the connection just the line after you call the open method
