主题：[求助]如何更改图片保存路径

Dim r As Row = Tables("员工").Current
r("照片") = r("工号") & ".jpg"
FileSys.CopyFile(e.FullPath, ProjectPath & "Attachments\" & r("照片"),True)

如何将带红的一段更改为共享文件中的一个文件夹。例如改为：

FileSys.CopyFile(e.FullPath, ProjectPath & "C:\Documents and Settings\All Users\Documents\影印文件夹\" & CurrentTable.Current("收文编号") & "_" & Index & ".jpg",True)