vb备份access数据库的方法代码.pdf
文本预览下载声明
这个代码其实也适用于其它类型文件的复制,要修改一下
其中的语句哦PrivateSubbak_Click()DimTargetFileName
AsString目标文件名OnErrorResumeNext
Withcdlog1.DialogTitle=数据备份.InitDir=
App.Path.FileName=backup.mdb.Filter=(数据
库)*.mdb|*.mdb.CancelError=True.ShowSave
TargetFileName=.FileNameEndWith
显示全部