在VB中用了DATAGRID 所以就使用了ADODC控件。
然后用ADO操作:
Dim dbc As New adodb.Connection
Dim dbr As New adodb.Recordset
dbc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path  "\db1.mdb;mode=share deny none;Persist Security Info=False"
            dbr.Open "select * from temp"
            dbr.AddNew
            dbr!id2 = c(Combo1.ListIndex)
            dbr!日期 = DTPicker1.Value
            dbr!价格 = Text1(4)
            dbr!数量 = Text1(3)
            dbr.Update结果报:当前记录不支持更新,这可能是提供程序的限制,也可能是选定锁定类型的限制

解决方案 »

  1.   

    未指定记录集的锁定类型
    dbr.LockType = 适当的锁定类型
    dbr.Open "select * from temp"锁定类型常量说明:
    adLockBatchOptimistic 
    指示开放式批更新。需要批更新模式。 
    adLockOptimistic 
    指示逐个记录开放式锁定。提供者使用开放式锁定,仅在调用 Update 方法时锁定记录。 
    adLockPessimistic 
    指示逐个记录保守式锁定。提供者要确保记录编辑成功,通常在编辑之后立即在数据源锁定记录。 
    adLockReadOnly 
    指示只读记录。无法改变数据。 
    adLockUnspecified 
    未指定锁定类型。创建副本时,副本与源对象使用相同的锁定类型。