社区
VB基础类
帖子详情
ADODB.Recordset.Close
xieshy
2004-01-02 03:25:40
当关闭一个ADODB.Recordset时总提示:
Run-time error'3219':
在此环境中不允许操作。
请教何解?
...全文
62
7
打赏
收藏
ADODB.Recordset.Close
当关闭一个ADODB.Recordset时总提示: Run-time error'3219': 在此环境中不允许操作。 请教何解?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
xieshy
2004-01-06
打赏
举报
回复
rs.cancel
rs.close
daisy8675
2004-01-02
打赏
举报
回复
這問題我出過很多次﹐主要就是多表單中rs集的問題。
一般情況下我們都是if rs.state= 1 then rs.close在運行第二次就會出現不許操作提示。
而且rs集在datagrid中更新及時也讓我頭疼。
樓主﹐我只給建議﹐有不有效我不給你打保証﹐你好好去查﹐一定查是不是rs集合有別的地方用﹐又不能釋放。比如我用rs去綁定一個datagrid﹐然后再下一次再過這句就是不行的。
出這樣的問題只能查﹐查rs到底現在在什么地方使用﹐是不是能close掉。
實在沒有辦法我建議你還是用控件綁定﹐這是我在走頭無路時候用地
xionglibin
2004-01-02
打赏
举报
回复
你把主要的部分拿出來看一下。
這樣大家才能幫你看問題,不然根本就不知道你是出什麼錯。
因我們都有這樣的操作,但都沒有出現這樣的問題。
xieshy
2004-01-02
打赏
举报
回复
关联得太多。代码---无法贴出。
SoHo_Andy
2004-01-02
打赏
举报
回复
把你的完整代码贴出来看看
xieshy
2004-01-02
打赏
举报
回复
dim rs as new adodb.recordset
先打开rs,接着进行一些数据操作。然后执行rs.close 。马上提示出错。
SoHo_Andy
2004-01-02
打赏
举报
回复
我试了一下,没有错
是不是你描述的不清楚,还是你的环境有其它设置
尽量说详细些
set rs=server.CreateObject(
ado
db
.
recordset
) 的中文详细说明
是建立一个数据集 前面应该先定义此数据集 dim rs as
ado
db
.
recordset
然后就可以用 set rs=server.CreateObject(“
ado
db
.
recordset
”) 来建立一个数据集的实例,当然此时数据集中是没有数据的 rs.open …… 来打开一个记录集 rs.append或者rs.insert来添加记录 rs.edit来修改记录 对于添加或修改的记录,可以用 rs.fields(“字段名”)=xxx 来进行赋值 rs.update 把更改过的值更新回数据库 当你添加一个数据(rs1)进数据库时: rs.addnew rs(“rs1″)=”添加的数据” r
set rs=server.CreateObject("
ado
db
.
recordset
") 的中文详细说明
是创建一个数据库实例,但是什么是数据库实例?还有rs这个东西也不是一个变量,他在程序里边rs.update 等操作是如何进行的?打开的表示如何接收rs传过来的数据的?
数据库备份和回复源代码access
数据库 备份和回复 access数据库是Access的,我使用BACKUP的SQL语句,系统提示“无效的SQL语句”难道Backup不支持Access?用filec数据库恢复: Dim conn As New
ado
db
.Connection Dim rec As New
ado
db
.
Recordset
'SQLserver数据服务器名称;SQLuser数据服务器用户名称(一般为SA);SQLpaswd数据库用户密码 basename = "master" temstring = "driver={SQL Server};server=" & SQLsever & ";database=" & basename & ";uid=" & SQLuser & ";pwd=" & SQLpaswd & ";" restorefilename = "'" & Trim(Dir1.Path) & "'\'" & Trim(File1.FileName) & "'" 'Dir1.Path为数据库存放的目录;File1.FileName为数据库名称 conn.Open temstring conn.Execute ("restore database bikemag from disk='" & restorefilename & "'") conn.
Close
opy 函数,复制来实现备份
多种条件查询(VB6.0代码编写)
多种条件查询(VB6.0代码编写) 多种条件查询 QQ223857666勾月
ADO
DB
.rar_
ado
ado
db
_
ado
db
ado
_vb sqlserver
vb
ADO
方式,连接SQLSERVER数据库。
VB基础类
7,788
社区成员
197,583
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章