我正在尝试构建一个VBScript来自动运行一些.exe文件。问题是脚本和.exe文件是在闪存驱动器上,所以它需要自己找到当前的驱动器号。我可以使用%~d0
在批处理文件上执行此操作,但我更喜欢VBScript的一些功能,尤其是发送击键的功能。无论如何,我找到了一整套VBScript命令,但我不是专家,我需要语法方面的帮助。到目前为止,我已将其设置为打开任务管理器并按某些键以使其选择"性能选项卡"任务经理:
Dim Act :Set Act = CreateObject("Wscript.Shell")
Act.Run("taskmgr.exe")
Success = Act.AppActivate("taskmgr")
Wscript.Sleep 250
Act.SendKeys "{TAB 5}" :WScript.Sleep 500
Act.SendKeys "{RIGHT 3}" :WScript.Sleep 500
我想知道我需要使用什么命令来告诉脚本使用执行脚本的驱动器号(USB驱动器)。
答案 0 :(得分:2)
使用.ScriptFullName属性获取正在运行的脚本的完整文件规范,并为文件夹的路径应用.GetParentFolderName,或仅为驱动器号应用.GetDriveName。
>> Set oFS = CreateObject("Scripting.FileSystemObject")
>> s = WScript.ScriptFullName
>> WScript.Echo oFS.GetParentFolderName(s), oFS.GetDriveName(s)
>>
M:\bin M:
比照here