必须的设置和语句：
Data1.Connect = "access 2000" '数据库格式
Data1.DatabaseName = App.Path & "\***.MDB" '数据库路径
Data1.DefaultType = 2 '打开数据库的方式
Data1.RecordSource = "SQL语句" '链接数据表的SQL语句
Data1.Recordset.AddNew '添加新数据
............ '字段更新数据
Data1.Recordset.Update '更新数据表
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024