我想在VB6上做備份。路徑未找到VB6
這是我的代碼:
Private Sub Command1_Click()
Me.CommonDialog1.Filter = "*.sql"
Me.CommonDialog1.ShowSave
If Me.CommonDialog1.FileName <> "" Then
FileCopy App.Path & "C:\Users\Bea\Desktop\symptoms.sql", Me.CommonDialog1.FileName & ".sql"
MsgBox "Database had been successfully Saved on " & Me.CommonDialog1.FileName & ".sql" End If End Sub
我得到這個錯誤:
找不到路徑
有什麼可能出現的問題?
將您的目錄和文件名存儲在一個字符串中,使用dir()檢查它們是否存在,然後從您的filecopy調用中移除app.path – Hrqls 2013-03-12 06:19:05