为什么不能更新datagrid解决办法

为什么不能更新datagrid
Sub   Page_Load(sender   as   object,   e   as   eventargs)

 

Dim   objConn   as   New   OleDBConnection( "Provider=Microsoft.Jet.OLEDB.4.0;   Data   Source=e:\sff\site\db\test.mdb ")
objConn.Open()
Dim   ds   as   Dataset   =   New   DataSet()
Dim   objAdapter   as   New   OleDbDataAdapter( "SELECT   *   FROM   users ",   objConn)
Dim   objCmdBld   as   New   OleDbCommandBuilder(objAdapter)
objAdapter.Fill(ds,   "users ")
Dim   drow   as   DataRow
drow   =   ds.Tables( "users ").Rows(1)
drow(0)   =   "Joseph "
ds.Tables( "users ").Rows(0).AcceptChanges
objAdapter.Update(ds,   "users ")
End   Sub

只接受改变却不能更新数据库，请问为什么呢？谢谢

[解决办法]
ds.Tables( "users ").Rows(0).AcceptChanges
注释掉吧.