I am trying to use Visual Studio 2003 dataset with the ODBC .Net Provider with a UpdateCommand CommandType of Stored Procedure because
MSDN says you can't update a database using OBDC .Net Provider with CommandType = Text.  I added parameters so that I can update the dataset
but when I check the database after running the update command, there are no updated rows.  Here is my code.  Can someone tell me what I need
to do to update the database with any changes made to the dataset using the datagrid?

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       OdbcConn.ConnectionString = "ODBC;DSN=DBISAM Tables;DRIVER=DBISAM 3 ODBC Driver;"
       OdbcConn.Open()

       adapter = CreateDataAdapter(OdbcConn)

       adapter.Fill(dsOfficers, "Officers")
       DataGrid1.DataSource = dsOfficers.Tables(0)
End Sub

Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click

       dsOfficers.AcceptChanges()
       dsOfficers.GetChanges()
       adapter.Update(dsOfficers, "Officers")

End Sub

Public Function CreateDataAdapter(ByVal connection As OdbcConnection) As OdbcDataAdapter

  Dim selectCommand As String = _
           "SELECT OF_ID, OF_FNAME + ', ' + OF_LNAME Officer, OF_Title Title, OF_PHONE 'Phone', OF_EMAIL 'Email Address', If  
(OF_EMAIL_LOAN_RPT IS NULL OR OF_EMAIL_LOAN_RPT = False THEN FALSE ELSE TRUE) 'OF_EMAIL_LOAN_RPT' FROM OFFICER;"

  Dim adapter As OdbcDataAdapter = New OdbcDataAdapter(selectCommand, OdbcConn)

  adapter.UpdateCommand = New OdbcCommand("UPDATE Officer SET OF_EMAIL_LOAN_RPT = ? " & _
                                                                      "WHERE OF_ID = ?")

  adapter.UpdateCommand.Parameters.Add("@OF_ID", OdbcType.Numeric, 2, "OF_ID").SourceVersion = DataRowVersion.Original

  adapter.UpdateCommand.Parameters.Add("@OF_EMAIL_LOAN_RPT", OdbcType.Int, 5).Value = DataRowVersion.Proposed

  Return adapter

End Function