I'm using OleDbDataAdapter1, OleDbConnection1, DataSet11.

So why doesn't this code work:


Code:
 Public Function CreateCmdsAndUpdate(ByVal DataSet11 As DataSet, ByVal myConnection As String, ByVal mySelectQuery As String, ByVal Bathroom As String) As DataSet
        Dim myConn As New OleDbConnection1(myConnection)
        Dim myDataAdapter As New OleDbDataAdapter()
        myDataAdapter.SelectCommand = New OleDbCommand(mySelectQuery, myConn)
        Dim custCB As OleDbCommandBuilder = New OleDbCommandBuilder(myDataAdapter)

        myConn.Open()

        Dim DataSet1 As DataSet = New DataSet()
        myDataAdapter.Fill(DataSet11)

        myDataAdapter.Update(DataSet11, Bathroom)

        myConn.Close()

        Return DataSet11
    End Function
Thank you,
Pierre