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
*********************************
这个定义在公共模块里吗？
要保证变量没�
相关问答：
<?php
include("adodb/adodb.inc.php");
$db = &NewADOConnection("access");
$access = realpath("Data.mdb");
$dsn = "Provider=Microsoft.J ......
在Access软件里，可以直接设置日期为Now(),好像是这样吧。
通过sql语句，ALTER TABLE [article] ADD [date] datetime
但是直接在后面加Now()，结果出错，怎么通过sql语句直接设置成当前日期，而不用往里面加？ ......
我有一个表,
大致结构式这个样子的
id itname fenlei1id fenlei2id num
1 物品1 1 &n ......
我在使用adox+access,使用程序添加新列的时候总是出现错误,都有哪些需要注意的呀,谢谢!
我的代码是这样的!
C/C++ code:
CoInitialize (NULL);
bsSQL = ...(数据库连接字符串)
m ......
select max(classname) as classname,max(parentpath) as parentpath,max(rootid) as rootid,max(classid) as classid from prodclass where parentpath like '%0,3%' and Child=0 group by classname order ......
