| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1116 人关注过本帖
标题:[求助]为什么Recordset中的数据不能修改?急用请高手帮忙。
只看楼主 加入收藏
小山丘之王
Rank: 1
等 级:新手上路
帖 子:16
专家分:0
注 册:2004-5-20
收藏
 问题点数:0 回复次数:3 
[求助]为什么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真的是只读的,我该怎么改?我想按我的要求找到记录然后改变其中的一个数值。

搜索更多相关主题的帖子: Recordset 数据 
2004-06-16 18:48
firechun
Rank: 1
等 级:新手上路
帖 子:135
专家分:0
注 册:2004-4-13
收藏
得分:0 

记录集的打开方式不对,改:

rs.open ssql,cn,1,4

[此贴子已经被作者于2004-06-17 08:55:17编辑过]


本人在编程中国发表的所有文章,除特别说明外均属原创,转载时请注明作者编程中国
2004-06-17 08:53
小山丘之王
Rank: 1
等 级:新手上路
帖 子:16
专家分:0
注 册:2004-5-20
收藏
得分:0 

那个1,4是什么意思?

2004-06-17 18:40
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

Set rs = cn.Execute(sSQL)

这样打开记录集是只读的,你应该设置锁定方法和游标。

这样打开就可以了 rs.open sSQL,cn,1,3


天津网站建设 http://www./
2004-06-19 15:38
快速回复:[求助]为什么Recordset中的数据不能修改?急用请高手帮忙。
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.029247 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved