数据库备份的问题
以下是我的一段代码,单独运行此界面可以进行数据库的备份。但是连接到整个工程中就不可以备份数据了。这是为什么阿?问题出现在哪里阿,请高手指点。
Private Sub cmdCopy_Click() ''数据库备份
On Error Resume Next
FileCopy App.Path & "\clgl.mdb", App.Path & "\数据库备份\clgl.mdb"
MsgBox "备份成功!", , "系统提示"
End Sub
Private Sub cmdExit_Click() '''退出此界面
Set adoCon = New ADODB.Connection
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\clgl.mdb" & ";Persist Security Info=False"
Unload Me
End Sub
Private Sub Form_Load()
frmDataCopy.Width = 5640
frmDataCopy.Height = 2190
adoCon.Close
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set adoCon = New ADODB.Connection
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\clgl.mdb" & ";Persist Security Info=False"
End Sub
问题点数:15、回复次数:5Top
1 楼zhuanzhu_zhizhuo()回复于 2006-11-01 19:58:46 得分 5
Private Sub Form_Unload(Cancel As Integer)
Set adoCon = New ADODB.Connection
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\clgl.mdb" & ";Persist Security Info=False"
End Sub
这里估计是帖错了吧???
我看晕了
为什么楼主是 窗体加载的时候,关闭连接,而unload的时候却是打开????
filecopy没错啊,没能在你给的代码中看出错误!Top
2 楼Athoncj(阿龙)回复于 2006-11-01 20:00:05 得分 5
文件被锁定后不能被拷贝的。Top
3 楼bbiiy()回复于 2006-11-01 20:23:43 得分 0
运行时代码没有出现错误,单独运行此界面可以进行数据库的备份。但是连接到整个工程中就不可以备份数据了。这是为什么阿?
文件被锁定后不能被拷贝的。
我哪里所定文件了?Top
4 楼wxrwan(无奈小飞不耻上问)回复于 2006-11-01 23:31:08 得分 5
可能数据库对象没有释放吧.Top
5 楼bbiiy()回复于 2006-11-04 14:19:24 得分 0
数据库对象没有释放,能讲得再具体一些吗?Top




