Set objWsh = CreateObject("WScript.Shell")
objWsh.Run "C:\WINDOWS\system32\cmd.exe",1,False
WScript.Sleep 3000
'3秒后开始执行第一条命令
objWsh.AppActivate "C:\WINDOWS\system32\cmd.exe"
objWsh.SendKeys "devcon /enable PCI\RXVSTOR*~"
WScript.Sleep 3000
'3秒后开始执行第二条命令
objWsh.AppActivate "C:\WINDOWS\system32\cmd.exe"
objWsh.SendKeys "devcon /disable PCI\RXVSTOR*~"
Set objWsh = Nothing
当然更方便的是把两条命令写在bat中来执行,特别是命令更多的时候
温馨提示:答案为网友推荐,仅供参考