很急的问题，希望大家给予帮助。

Question

在VB中我建立了一个设计器，用它调到了自己做的ACCESS数据库。并且在Form中建立了一个DataGrid，调到了数据库。然后我又在设计器中将Command1属性中的高级——锁定类型定为：“4-开放式批处理”
想要达到能够在Form中的DataGrid里就能更改ACCESS数据库的目的。但是在我改了之后，回到ACCESS中查看时，数据还是没有变。
请高手指点这是怎么回事？情给予明确的帮助，谢谢。

Answer 1

    改了之后，要用recordset.updatebatch方法提交修改。

Answer 2

On Error GoTo UpdateErr
Private Sub Command3_Click()  '修改命令
DataGrid1.Col = 0
If DataGrid1.Text <> "" Then
  Adodc1.Recordset.UpdateBatch adAffectAll
Else
  Adodc1.Recordset.Requery
End If
Exit Sub
Private Sub Command5_Click() '更新
On Error GoTo RefreshErr
Adodc1.Recordset.Requery
Exit Sub
RefreshErr:
  MsgBox Err.Description
End Sub
UpdateErr:
  MsgBox Err.Description
end sub

Answer 3

写错了。是这样的：
Private Sub Command3_Click()  '修改命令
On Error GoTo UpdateErr
DataGrid1.Col = 0
If DataGrid1.Text <> "" Then
  Adodc1.Recordset.UpdateBatch adAffectAll
Else
  Adodc1.Recordset.Requery
End If
Exit Sub
UpdateErr:
  MsgBox Err.Description
end subPrivate Sub Command5_Click()'更新
On Error GoTo RefreshErr
Adodc1.Recordset.Requery
Exit Sub
RefreshErr:
  MsgBox Err.Description
End Sub

Answer 4

为什么我把以上的代码输入了，会出现Adodc1.错误的字样？？

Answer 5

小弟的MSN在此：[email protected]
请各位大虾指点，我会将自己的100分如数送上的。

Answer 6

Adodc1.Recordset.UpdateBatch adAffectAll

Answer 7

Adodc1.CursorType = adOpenStatic
Adodc1.CursorLocation = adUseClient
Adodc1.LockType = adLockBatchOptimistic