시작 옵션이있는 vbscript를 사용하여 백그라운드에서 파일을 실행하는 방법

Question

실행 옵션 "1"을 사용하여 백그라운드에서 배치 파일을 실행해야합니다 (배치 파일에서 % 1이됩니다). 여기 내 코드입니다 : - 선택적 -

Set WshShell = CreateObject("WScript.Shell") 

WshShell.Run chr(34) & "C:\Program Files\Pineapplesoft\Lost computer\lostcomputeraudio.bat" & Chr(34), 0 
Set WshShell = Nothing 

Answer 1

문자열을 인용하는 함수를 사용하여 구조화/웰 확장 방법으로 명령 줄을 구축하기 위해 조작하는 기능을 통해 배열의 모든 요소를 ​​매핑 할 하위; (자동적 인 공간 분리와) 함께 부품을 넣어) (가입 사용

Option Explicit 

Function qq(s) : qq = """" & s & """" : End Function 

Sub mapF(a, f) 
    Dim i 
    For i = LBound(a) To UBound(a) 
     a(i) = f(a(i)) 
    Next 
End Sub 

Dim sFSpec : sFSpec = "C:\Program Files\Pineapplesoft\Lost computer\lostcomputeraudio.bat" 
Dim aParms : aParms = Split("1#/pi:pa po#last parm", "#") 
mapF aParms, GetRef("qq") 

Dim sCmd : sCmd = Join(Array(_ 
    qq(sFSpec) _ 
    , Join(aParms) _ 
)) 

WScript.Echo qq(sCmd) 

출력 :

cscript startaudio.vbs 
""C:\Program Files\Pineapplesoft\Lost computer\lostcomputeraudio.bat" "1" "/pi:pap po" "last parm""