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数据库做了一个图书数据库，里面有一个字段是ISBN，就是ISBN号，但是只的一总分图书写的ISBN号，有的没写，写的那一部分有的ISBN是重复的，能否用SQL语言把重复的过滤掉，但没写ISBN号的图书不能过滤掉，� ......
哪里出错了，输出这样的结果？？
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
在Access软件里，可以直接设置日期为Now(),好像是这样吧。
通过sql语句，ALTER TABLE [article] ADD [date] datetime
但是直接在后面加Now()，结果出错，怎么通过sql语句直接设置成当前日期，而不用往里面加？ ......
