大宇资讯停牌:通过excel的vba使用ado进行数据库操作一问

来源:百度文库 编辑:高校问答 时间:2024/04/30 00:32:08
操作一个没有内容的表xxx(access2003)
Sub test4()
Dim myres1 As New ADODB.Recordset
Set myres1.ActiveConnection = DBMaster.SetConn '我用来设置数据库连接的函数
myres1.Open "mainlocal", Conn, adOpenKeyset, adLockOptimistic, adCmdTable
myres1.AddNew
myres1.Fields("cell") = 27 '只有这个字段必填
'问题在下面一句
myres1.Update
End Sub

显示错误:
运行时错误'-2147217887(80040e21)'
由于数据表'xxx'需要一个相关记录,不能修改或添加记录

我使用command对象的excute方法也是一样的

但是对于已经有了一条记录的表,就没有问题

那么如何才能向一个空的表中输入数据呢?