如何让绑定数据的datagrid在执行某个命令时才一次保存所有的修改数据.txt

以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

批 更 新 打 开 ADODB.Recordset. 
    Project: Form1、 Command1、 Command2、 DataGrid1 
    Ref: ADO 
    代 码 : 
    Option Explicit 
    Dim adoConnection As ADODB.Connection 
    Dim adoRecordset As ADODB.Recordset 
    Private Sub Command1_Click() 'Save Commit 
    adoRecordset.UpdateBatch 
    End Sub 
    Private Sub Command2_Click() 'Cancel Rollback 
    adoRecordset.CancelBatch 
    End Sub 
    Private Sub Form_Load() 
    Set adoConnection = New ADODB.Connection 
    'adoConnection.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=northwindcs" 
    'adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\MyVBP\DBData\NWind2K.mdb;Persist Security Info=False" 
    adoConnection.Open "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=E:\MyVBP\DBData\NWind97.mdb;Persist Security Info=False" 
    Set adoRecordset = New ADODB.Recordset 
    adoRecordset.CursorLocation = adUseClient 'Access需 要 
    adoRecordset.Open "产 品 ", adoConnection, adOpenKeyset, adLockBatchOptimistic 
    Set DataGrid1.DataSource = adoRecordset 
    End Sub 
<END>