Question

vb 对象打开时不允许操作

窗体上有一个command控件，点击就会在datagrid控件里显示数据库的查询内容，如再次点击会报错 “3705 对象打开时不允许操作 ”，

strSQL = "select 语句"
DataRec.CursorLocation = adUseClient
DataRec.Open strSQL, DataConn, 3, 3
Set DataGrid1.DataSource = DataRec

当在程序后面加上DataRec.close时点击command控件没反应（datagrid里不显示任何值）。

这种情况该怎么处理？？？

Answer 1

看楼主说的应该是选择数据库文件后打开，那么你的关闭DataRec.close实际上没有关闭数据库连接！实际上要关闭的是DataConn，也就是在打开文件前要加上DATAconn.close和Set DATAconn=nothing。
后面关于DataRec.close后点击COMMAND控件没反应的情况，没看到完整代码，所以不清楚原因了！

Answer 2

你还没有完全关闭数据库，只是关闭了记录集，
你要这样修改：
在rs.close
后面还要加上
conn.close
同样在form
的
unload
事件中也要写入此代码

Answer 3

private
sub
command3_click()
pubconn.close
pubconn.open
strconn
你在这里把pubconn关闭了，而前面
rstable.open
strsql,
pubconn,
adopendynamic,
adlockoptimistic
使用
close
方法关闭
connection
对象还将关闭与连接相关联的任何活动
recordset
对象。
所以rstable也被关闭了，所以是对象关闭时，不允许操作。

Answer 4

处理完毕之后，要及时关闭引用的对象
DataRec.Close