关于关闭mdb数据库的连接的问题

Question

楼上的，我试了你的语句，VB根本不识别你的DIM定义啊！再说我认为问题的关键在完全断开进程与数据库的连接。因为不解决这个问题的话，以后做恢复的时候一样又会出现同样状况的。

Answer 1

to firefly_xu (萤火虫)  
你这种备份方式确实有这个问题
引用microsoft Scripting runtime （要引用）
Dim fso As New FileSystemObject
Dim bb$
bb = Trim(Text1.Text)
If bb = "" Then GoTo 1
fso.CopyFile "bank.mdb", "database\" & bb & "bank.mdb"

Answer 2

我看了你上面写的代码，你的窗体上是不是有adodc控件？
如果是的话，要用Adodcrecords.Recordset.activeconnection.close 才可以关闭它打开的连接。
虽然fso可以备份文件，但我觉得还是应该在备份前关闭所有的连接，
这样可以保证数据完整性，假如备份时间较长，而这时还有在进行写操作，
那备份的数据就不完整了。

Answer 3

to icnetcn(yoyo之无双) 
非常感谢您的帮助问题解决了。很多朋友都推荐FSO 的方法，所以我还想问一下：
microsoft  Scripting  runtime要怎么引用呢？（本人为初学）
谢谢各位了！