问高手（在线等！）：如何关闭ADODC控件的数据库连接？马上揭贴！
我要在程序里备份数据库文件（test.mdb），此时要先关闭所有和该数据库的连接。
我已经完成了rs.close,con.close。但还有adodc1不知道如何关闭，因为它没有close/open方法。
请问：
1、如何判断ADODC1是否已经打开连接？
2.如果已经打开，如何关闭？
是否可以用类似方法（好象有问题）：Adodc1.RecordSource = “”
Adodc1.Refresh
问题点数：0、回复次数：1Top
1 楼yanghu0838（杨虎）回复于 2005-04-01 10:51:57 得分 0
Dim Conn As ADODB.Connection
Dim Rs As ADODB.Recordset
conn conntionstring=Provider= Microsoft.Jet.OLEDB.4.0'"; "data source= & app.Path= data\customs.mdb'"
Conn.Open
Rs.ActiveConnection = Conn
Rs.CursorLocation = adUseClient
Rs.CursorType = adOpenDynamic
Rs.Source = "Select * From login where 用户='" & "'" & txtUserName.Text
Rs.Open
If Rs.EOF = False Then
End If
'检查正确的密码
If txtPassword = "password" Then
'将代码放在这里传递
'成功到 calling 函数
'设置全局变量时最容易的
LoginSucceeded = True
Me.Hide
Else
MsgBox "无效的密码，请重试!", , "登录"
txtPassword.SetFocus
SendKeys "{Home}+{End}"
End IfTop
