隐藏BAT批处理窗口

dim objShell
set objShell=wscript.createObject("WScript.Shell")
iReturnCode=objShell.Run("C:\run.bat",0,TRUE)