中国DOS联盟

Virtual Audio Cable 虚拟声卡不知各位用过没有，它支持命令行操作的，
例如：

D:\Program Files\Virtual Audio Cable\audiorepeater.exe /Input:"Virtual Cable 1" /Output:"Realtek AC97 Audio" /SamplingRate:48000 /ChanCfg:Custom=30 /AutoStart

现在想将以上批处理转化为用 VBS 脚本处理，请问如何编写呢？
对于我个人的难题是命令行中包含了双引号、冒号、等号、斜杠、空格，在VBS里应如何处理它？

解决方法：（摘自微软官方，原来双引号的地方改为双双引号即可）

Const HIDDEN_WINDOW = 12
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")
errReturn = objProcess.Create("D:\Program Files\Virtual Audio Cable\audiorepeater.exe /Input:""Virtual Cable 1"" /Output:""Realtek AC97 Audio"" /SamplingRate:48000  /ChanCfg:Custom=30 /AutoStart" , null, objConfig, intProcessID)

Last edited by chishingchan on 2008-6-24 at 12:24 AM ]

顶上望高手能够解答。

用VBS无非也是用到run方法吧？

Const HIDDEN_WINDOW = 12
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")
errReturn = objProcess.Create("D:\Program Files\Virtual Audio Cable\audiorepeater.exe /Input:""Virtual Cable 1"" /Output:""Realtek AC97 Audio"" /SamplingRate:48000  /ChanCfg:Custom=30 /AutoStart" , null, objConfig, intProcessID)