不能保存啊！请各位看看！！谢谢！

[jxufeboy]

Private Sub 保存到磁盘_Click()
On Error Resume Next
CommonDialog1.CancelError = True
CommonDialog1.DialogTitle = "保存文件"
CommonDialog1.FileName = ""
'解释见上面
CommonDialog1.Filter = "备份文件(*.mdb)|*.mdb|文本文件(*.txt)|*.txt"
CommonDialog1.Flags = cdlOFNCreatePrompt + cdlOFNHideReadOnly
CommonDialog1.ShowSave
If Err = cdlCancel Then Exit Sub

End Sub

我想将一个MDB文件保存，应该怎么指定路径和复制？MDB原先是和程序在同一个文件夹的。谢谢大侠了。。。

[zyl910]

CommonDialog1的功能只是显示通用的对话框，以便用户选择文件保存的路径

具体的文件操作需要你自己写代码

[yhl123]

up

[CHKK]

用COPY 语句做文件的复制

CommonDialog1的功能只是显示通用的对话框 ，得到个路径什么的，别的什么都不做