VBS如何向批处理传递命令行参数

spfnug

如题，如何将参数传递给check.bat,即执行"check %1"

1. 
   
2. strComputer = "."
   
3. set objectShell=wscript.createObject("wscript.shell")
   
4. Set objWMIService = GetObject("winmgmts:" _
   
5.     & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2")
   
6. Set colMonitoredProcesses = objWMIService. _        
   
7.     ExecNotificationQuery("select * from __instancecreationevent " _
   
8.         & " within 1 where TargetInstance isa 'win32_process'")
   
9. i = 0
   
10. Do While i = 0
    
11.     Set objLatestProcess = colMonitoredProcesses.NextEvent
    
12.     objectShell.Run "check.bat %1", 1, TRUE
    
13. Loop
    

复制代码

zqz0012005

objectShell.Run "check.bat " & objLatestProcess.TargetInstance.Name, 1, TRUE