我用datagrid连接ADODB，如何能及时通过datagrid的修改更新数据库？

Question

我的代码：
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql As String
sql = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\My Documents\数据库\学生.mdb;Persist Security Info=False"
cn.Open sql
rs.CursorLocation = adUseClient
rs.LockType = adLockBatchOptimistic
rs.Open "select * from 同学", cn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
DataGrid1.Visible = True  
DataGrid1.Refresh
我在datagrid中修改了显示的内容后，后台的数据库并没有做相关修改。需要加代码吗？

Answer 1

updatebatch之后，数据就更新了，记得把datagrid的allowupdate属性设为true

Answer 2

首先把datagrid的allowupdate属性设为truers.LockType = adLockBatchOptimistic'你设为批量更新了，改为
rs.LockType =adLockPessimistic或者
Private Sub Command1_Click()
   rs.updatebatch
End Sub

Answer 3

回：sxs69() 
不行~还是无法更新，跟以前一样：
弹出一标题为：datagrid control的警告窗：缺少更新过刷新的健列信息请再想想办法，谢谢大家乐~