
关于VBS调用外部程序和获取自身路径的问题。
我用A脚本启动B脚本(两者路径不同)。A脚本源码:VBScriptcodesetws=WScript.CreateObject("WScript.Shell")thisp...
我用A脚本启动B脚本(两者路径不同)。
A脚本源码:
VBScript code
set ws=WScript.CreateObject("WScript.Shell")
thispath=createobject("Scripting.FileSystemObject").GetFolder(".").Path
msgbox thispath
ws.Run """C:\Program Files\Internet Explorer\123.vbs"""
B脚本(123.vbs)源码:
VBScript code
thispath=createobject("Scripting.FileSystemObject").GetFolder(".").Path
msgbox thispath
wscript.sleep(5000)
结果A输出的是自己的路径,B输出的依然是A的路径。这与我预想的大相径庭。请问为什么。另外有什么办法让B输出B自己 的路径(手动启动B是输出B的路径,但是通过A启动B却输出A的路径。)。
我是VBS的业余爱好者,知道这是一个简单的问题,还望大家不吝赐教。 展开
A脚本源码:
VBScript code
set ws=WScript.CreateObject("WScript.Shell")
thispath=createobject("Scripting.FileSystemObject").GetFolder(".").Path
msgbox thispath
ws.Run """C:\Program Files\Internet Explorer\123.vbs"""
B脚本(123.vbs)源码:
VBScript code
thispath=createobject("Scripting.FileSystemObject").GetFolder(".").Path
msgbox thispath
wscript.sleep(5000)
结果A输出的是自己的路径,B输出的依然是A的路径。这与我预想的大相径庭。请问为什么。另外有什么办法让B输出B自己 的路径(手动启动B是输出B的路径,但是通过A启动B却输出A的路径。)。
我是VBS的业余爱好者,知道这是一个简单的问题,还望大家不吝赐教。 展开
1个回答
展开全部
A脚本
set ws=CreateObject("WScript.Shell")
msgbox ws.CurrentDirectory '当前工作文件夹
ws.Run """C:\Program Files\Internet Explorer\123.vbs"""
B脚本
WScript.echo Left(WScript.ScriptFullName,Len(WScript.ScriptFullName)-Len(WScript.ScriptName))
wscript.sleep(5000)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
WScript.echo WScript.ScriptFullName '返回当前运行脚本的完整路径名。
WScript.echo WScript.ScriptName '返回当前运行脚本的文件名。
WScript.echo WScript.Path '返回主可执行文件路径名称。
WScript.echo WScript.FullName '返回主可执行文件名称
set ws=CreateObject("WScript.Shell")
msgbox ws.CurrentDirectory '当前工作文件夹
ws.Run """C:\Program Files\Internet Explorer\123.vbs"""
B脚本
WScript.echo Left(WScript.ScriptFullName,Len(WScript.ScriptFullName)-Len(WScript.ScriptName))
wscript.sleep(5000)
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
WScript.echo WScript.ScriptFullName '返回当前运行脚本的完整路径名。
WScript.echo WScript.ScriptName '返回当前运行脚本的文件名。
WScript.echo WScript.Path '返回主可执行文件路径名称。
WScript.echo WScript.FullName '返回主可执行文件名称
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询