您所在位置：主题：我的VB数据库,AddNew方法怎么用不了阿??
wang8118
[专家分：50] 发布于 2006-05-28 10:39:00
Private Sub Command1_Click()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=校园卡管理系统"
cn.Open
rs.ActiveConnection = cn
rs.Open "select * from 资料"
rs.AddNew
rs.Fields("wa") = "啊啊啊啊啊啊"
rs.Update
MsgBox "更新成功"
rs.Close
End Sub
错误为：
实时错误'3251' 当前记录集不支持更新,这可能是提供程序的限制,也可能是选定锁定类型的限制
然后rs.AddNew 变为黄颜色
可是我用insert方法 又可以更新,为什么这个却不行阿,我可是照着书上做的[em10]
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=校园卡管理系统"
cn.Open
rs.ActiveConnection = cn
rs.Open "select * from 资料"
rs.AddNew
rs.Fields("wa") = "啊啊啊啊啊啊"
rs.Update
MsgBox "更新成功"
rs.Close
End Sub
错误为：
实时错误'3251' 当前记录集不支持更新,这可能是提供程序的限制,也可能是选定锁定类型的限制
然后rs.AddNew 变为黄颜色
可是我用insert方法 又可以更新,为什么这个却不行阿,我可是照着书上做的[em10]
