主题：数据提取问题

Dim dlg As New SaveFileDialog '定一个新的SaveFileDialog

        dlg.Filter = "备份文件|*.dat"

        dlg.Title = "请选择文件保存路径!"

        dlg.InitialDirectory = ProjectPath & "databak\" '方法1 需要指定文件保存路径     

        'dlg.InitialDirectory = ProjectPath & "Reports\系统备份\" & "databak\" '方法2         

        dlg.FileName = Format(Date.Today, "yyyy-MM-dd")

        If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮

            FileSys.CopyFile(ProjectPath & "data.mdb", dlg.FileName, True) '方法1

            ' FileSys.CopyFile(ProjectPath & "Reports\系统备份\" & "data.mdb", dlg.FileName, True) '方法2

            MessageBox.Show("你要保存为：" & dlg.FileName, "提示")

        End If

为什么我用方法1没有问题，用方法2有问题？请老师帮忙修改代码