如何使用VB6找到应用程序所在的目录？

Question

我在文件夹 ABC ，里面有文件： notes.txt 我希望能够将 notes.txt 从我的文件夹 ABC 复制到 D：\ XYZ 上的文件夹 XYZ

所以当程序编译完毕后我按下COPY按钮无论文件夹 ABC 放在C：\ M：\或K：\中都无关紧要 - 它总是会查看文件夹 ABC 执行程序并将 notes.txt 复制到其他路径/目的地

我正在使用VB6

谢谢！

我尝试使用Microsoft Scripting Runtime 这样的事情：

fso.CopyFile“L：\ ABC \ notes.txt，”D：\ XYZ“

但我不想依赖 ABC 文件夹

的路径

Answer 1

App.Path提供EXE执行的路径。这应该适用于\\ABCD\EFG\notes.txt

等网络路径

这应该这样做

fso.CopyFile App.Path & "\ABC\notes.txt", "D:\XYZ"