大家不要打我，我都觉得不好意思问。

Question

dbc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\db1.mdb;"
dbr.Open "select * from 货品码", dbc
dbr.AddNew 'Array("款号", "颜色", "尺码"), Array(33333, "E3", "89")
dbr!款号 = 33333
dbr!颜色 = "S3"
dbr!尺码 = "23"
dbr.Update这样简单的一句话都会报错！——晕！
当前记录集不支持更新！这可能是程序提供的限制，也可能是选定锁定类型的限制！

Answer 1

dbr.Open "select * from 货品码", dbc,3,3就可以了。
其实你应该用INSERT来添加记录而不是用RS来做。

Answer 2

而且，datagrid不知道怎么更新,            
用了Adodc1.Refresh没反映！！

Answer 3

能不能跟我讲一下那后面的3，3是什么意思啊！
-------------------------------------
adOpenStatic, adLockOptimistic

Answer 4

你是以只读方式打开记录集的。除此以外的其它加锁方式都支持更新。Open 方法 (ADO Recordset)
打开游标。语法recordset.Open Source, ActiveConnection, CursorType, LockType, Options* CursorType   可选，CursorTypeEnum 值，确定提供者打开 Recordset 时应该使用的游标类型。可为下列常量之一（参阅 CursorType 属性可获得这些设置的定义）。AdOpenForwardOnly （默认值）打开仅向前类型游标。 
AdOpenKeyset       打开键集类型游标。 
AdOpenDynamic      打开动态类型游标。 
AdOpenStatic       打开静态类型游标。 
*LockType   可选。确定提供者打开 Recordset 时应该使用的锁定（并发）类型的 LockTypeEnum 值，可为下列常量之一（参见 LockType 属性可获得详细信息）。AdLockReadOnly    （默认值）只读 — 不能改变数据。 
AdLockPessimistic  保守式锁定（逐个） — 提供者完成确保成功编辑记录所需的工作，通常通过在编辑时立即锁定数据源的记录。 
AdLockOptimistic   开放式锁定（逐个） — 提供者使用开放式锁定，只在调用Update 方法时才锁定记录。 
AdLockBatchOptimistic 开放式批更新—用于批更新模式（与立即更新模式相对）。 *Options   可选，长整型值，用于指示提供者如何计算 Source 参数（如果它代表的不是 Command 对象），或从以前保存 Recordset 的文件中恢复 Recordset。可为下列常量之一（参见 CommandType 属性可获得该列表中前五个常量的详细说明）。adCmdText  指示提供者应该将 Source 作为命令的文本定义来计算。 
adCmdTable 指示 ADO 生成 SQL 查询以便从在 Source 中命名的表中返回所有行。 
adCmdTableDirect 指示提供者更改从在 Source 中命名的表中返回所有行。 
adCmdStoredProc  指示提供者应该将 Source 视为存储过程。 
adCmdUnknown     指示 Source 参数中的命令类型为未知。 
adCmdFile        指示应从在 Source 中命名的文件中恢复保留（保存的）Recordset。 
adAsyncExecute   指示应异步执行 Source。 
adAsyncFetch     指示在提取 Initial Fetch Size 属性中指定的初始数量后，应该异步提取所有剩余的行。如果所需的行尚未提取，主要的线程将被堵塞直到行重新可用。 
adAsyncFetchNonBlocking 指示主要线程在提取期间从未堵塞。如果所请求的行尚未提取，当前行自动移到文件末尾。 

Answer 5

解释的好详细哦
我问人人，人人为我！感谢ing！！！
散分以感谢教我的人，及热心观众上面我加了两个三后就遇到下面的问题了！
Adodc1.RecordSource = "SELECT id1,id2,toid2,日期,sum(数量) as 数量,价格 From temp where temp.日期=#" & DTPicker1.Value & "# and temp.id2=" & c(Combo1.ListIndex) & " GROUP BY id1,id2,toid2,日期,价格"
        Adodc1.Refresh
        Print Adodc1!id1不知道为什么又报错！提示在Print Adodc1!id1
是不是因为用了GROUP BY 。
整个程序为        
        dbr.Open "select * from 流水单", dbc, 3, 3
        Do While Adodc1.Recordset.EOF = False
            dbr.AddNew Array(dbr!ID1, dbr!ID2, dbr!toID2, dbr!日期, dbr!价格, dbr!数量), Array(Adodc1!ID1, Adodc1!ID2, Adodc1!toID2, Adodc1!日期, Adodc1!价格, Adodc1!数量)
            dbr.Update
            Adodc1.Recordset.MoveNext
        Loop其意图为将表TEMP的记录合并插入流水单这张表，然后删除TEMP表