If conn.State = 1 Then
conn.Close
End If
SourceFile = " " & App.Path & "\restaurant.mdb"
TargetFile = " " & App.Path & "\copy"
FileCopy SourceFile, TargetFile
错误的文件名或密码

restaurant.mdb是一个数据库,我想把它备份到copy文件夹下
错误的提示如上

   SourceFile =" " & App.Path & "\a.mdb"
   TargetFile = " " & App.Path & "\copy\a.mdb"
   FileCopy SourceFile, TargetFile

   app.path 前的空格为什么要加,有什么意义吗?象上面改成  SourceFile =App.Path & "\a.mdb"
   就可以了,空格使他出错.。不过象你这样是得不到你要的结果的。他只会将你的数据库复制成一个名叫copy的文件。如果你要想复制到copy目录下，你得用dir判断一下有没有这个目录存在，如果不存在，你得用mkdir建立一个目录，然后再将 TargetFile = App.Path & "\copy\a.mdb"

   

非常感谢你呦

问题解决了，copy文件夹我已经提前 建好了
顺便问一句是不是每次退出时只是对这个库进行更新？

不明白你的意思

呵呵
我明白了
”你得用dir判断一下有没有这个目录存在，如果不存在，你得用mkdir建立一个目录“
可以给段代码吗？
谢谢