[求助]为什么Recordset中的数据不能修改?急用请高手帮忙。
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sSQL As String
Dim sOut As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.ConnectionString = "DSN=test;UID=;PWD=;"
cn.Open
sSQL = "SELECT 班组记录.成品数量 FROM 班组记录 WHERE 班次编号='0000000' and 产品编号='000000'"
Set rs = cn.Execute(sSQL)
sOut=rs.Fields("成品数量")
MsgBox sOut
'做到这里都没有什么问题的。
rs.Fields("成品数量") = Text_cpsl
rs.Update
'就是这个不对,不知道为什么。似乎Recordset中的记录是只读的,我试着删除这条记录也不行
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
'如果Recordset真的是只读的,我该怎么改?我想按我的要求找到记录然后改变其中的一个数值。