大哥,好象没有Adodc1.Recordset.Fields("配料编号") = "01010001"这种用法吧,换成Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields(0).Value = "01010001"'fields(X As Integer)是第x个字段 Adodc1.Recordset.Update                      '比如”配料编号“是第一个字段试试,如果可以一定要给分哦!(我刚调试过了,应该没问题)