' run_hidden.vbs
' 用途：静默运行传入的命令行程序（无窗口、无闪烁）
' 用法：wscript.exe //nologo "run_hidden.vbs" "C:\path\to\your.bat"

If WScript.Arguments.Count = 0 Then
    WScript.Quit 1
End If

Dim strCommand
strCommand = WScript.Arguments(0)

' 如果有多个参数（如带参数的命令），可以拼接（本例只传一个 .bat 路径）
' 例如：WScript.Arguments(0) 是路径，后续可加 WScript.Arguments(1) 等

Dim objShell
Set objShell = CreateObject("WScript.Shell")

' 第二个参数 0 表示隐藏窗口（SW_HIDE）
' 第三个参数 False 表示不等待进程结束（异步执行）
objShell.Run """" & strCommand & """", 0, False

Set objShell = Nothing