VBS如何打开一个程序(VBS不在程序目录)
想打开一个游戏,执行程序是红框里的"PAL4.EXE",代码如下:SETObjShell=CreateObject("Wscript.Shell")ObjShell.Ru...
想打开一个游戏,执行程序是红框里的"PAL4.EXE",代码如下:
SET ObjShell=CreateObject("Wscript.Shell")ObjShell.Run "E:\PAL4\PAL4.EXE"
问题出现了(如下图):
主程序似乎找不到资源文件。。也不知到是怎么回事？
但是看到桌面上生成了错误报告，我就知道怎么回事了（VBS也在桌面上），貌似VBS把当前目录（桌面）作为运行程序的目录了，所以应用程序找不到资源文件。。
请问如何能够在目标目录打开文件，使其正常运作？（尽量简单一些，我小白）
请教这方面的能人帮帮忙，在下感激不尽。 展开
SET ObjShell=CreateObject("Wscript.Shell")ObjShell.Run "E:\PAL4\PAL4.EXE"
问题出现了(如下图):
主程序似乎找不到资源文件。。也不知到是怎么回事？
但是看到桌面上生成了错误报告，我就知道怎么回事了（VBS也在桌面上），貌似VBS把当前目录（桌面）作为运行程序的目录了，所以应用程序找不到资源文件。。
请问如何能够在目标目录打开文件，使其正常运作？（尽量简单一些，我小白）
请教这方面的能人帮帮忙，在下感激不尽。 展开
2个回答
展开全部
'用销悄CreateObject的方法开启WshShell
Set WshShell=CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("strDesktop&“/游戏快捷方式"亏困渣) '取得“桌面”的路径
Set oShellLink=WshShell.CreateShortcut(创建快捷方式.lnk)
oShellLink.TargetPath = "E:\PAL4\尺族PAL4.EXE"
oShellLink.WorkingDirectory=strDesKtop
'保存快捷方式
oShellLink.Save
看看是不是在桌面
确认路径啊
Set WshShell=CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("strDesktop&“/游戏快捷方式"亏困渣) '取得“桌面”的路径
Set oShellLink=WshShell.CreateShortcut(创建快捷方式.lnk)
oShellLink.TargetPath = "E:\PAL4\尺族PAL4.EXE"
oShellLink.WorkingDirectory=strDesKtop
'保存快捷方式
oShellLink.Save
看看是不是在桌面
确认路径啊
追问
你的代码有错误,第四行----创建快捷方式.lnk---没加引号,害的我好一通找,依旧不行,问题出在快捷方式的起始位置,正常的值是E:\PAL,而VBS生成的LNK是空的,系统依旧认为以桌面为开始...汗.
追答
那个谢谢你改了
自己动手解决的好
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
你的编辑是可行的。还是因为安装了64位系统的问题。
更多追问追答
追问
什么意思呀?64位系统问题么? 有解决方法么?
我关心的不是问题,而是解决方案,望解答!
追答
你使用批文件试试。后缀改。bat
.start 命令
调用外部程序，所有的 DOS命令 和 命令行程序 都可以由 start命令 来调用。
入侵常用参数：
MIN 开始时窗口最小化
SEPARATE 在分开的空间内开始 16 位 Windows 程序
HIGH 在 HIGH 优先级类别开始应用程序
REALTIME 在 REALTIME 优先级类别开始应用程序
WAIT 启动应用程序并等候它结束
parameters 这些为传送到命令/程序的参数 Sample：
/MIN test2.bat arg1 arg2 (调用同目录下的 test2.bat，且输入2个参数给他，且本窗口最小化)
Sample：e:\"program files"\极品列车时刻表\jpskb.exe (文件路径名有空格时)
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
