Access 对象已关闭,操作不允许!
Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection
Private Sub Command1_Click()
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb;Persist Security Info=False"
Rs.CursorLocation = adUseClient
Rs.Open "Select * from Tm", Conn, adOpenKeyset, adLockOptimistic
End Sub
Private Sub Command2_Click()
Msgbox Rs.RecordCount 这里就显示对象已关闭了
End Sub
郁闷了耶，那位高手帮忙看看！
贴出的代码没有问题，应该其他位置有问题，看其他位置是否有关闭
Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection
Private Sub Command1_Click()
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb;Persist Security Info=False"
Rs.CursorLocation = adUseClient
Rs.Open "Select * from Tm", Conn, adOpenKeyset, adLockOptimistic
Rs.MoveFirst
Rs.MoveLast
MsgBox Rs.RecordCount
End Sub
先单击Command1
然后单击Command2
Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection
*********************************
这个定义在公共模块里吗？
要保证变量没�
相关问答：
IsSqlDataBase = 0 '主数据库类型(1=SQL，0=AC)
'===========================================================================
SqlDatabaseName = "ads365" '主数据库名
S ......
我的数据库是简体sqlserver2000 ,我想在繁体access下连接,通过odbc是可以了,但在access下出现打开的表全中"#已删除"
不知道要怎么操作才可以用ACCESS繁体连接简体sqlserver2000.谢谢!!!
大家都 ......
ACCESS数据库中有一个tablename表，设计如下
编号,书名,作者,出版时间,出版社,ISBN,目录,简介
其中除“编号”为自动编号外，其它都为“备注”
其中"编号"维一，在“ISBN”中有的为空值， ......
如题在我打开access修改的时候报错
我装的Ghost 的XP版 sp3的补丁
错误签名
AppName: msaccess.exe AppVer: 11.0.8166.0 AppStamp:46437912
ModName: pintlgnt.ime&n ......
最近准备为公司网站用VB做个产品展示生成，生成部分基本没问题，
问题出现在查询部分，使用了MSHFelxGrid(DATAGrid不能满足操作需求)，本来以为收工了，昨天再次测试的时候发现了以下问题
当数据库字段为� ......
