运行路径问题

Question

用VB写了一个程序,,生成了编译exe文件现在我把EXE文件拷贝一份放在桌面,,运行该程序,,提示找不到数据库程序里面用的是app.path获取路径请问像这种情况怎么样才能获取该程序的真实所在的目录中的exe文件

Answer 1

在桌面为什么要拷贝一份EXE文件 ,直接在桌面创建快捷方式不就行了吗

Answer 2

    MsgBox IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\") & App.EXEName & ".exe"