生のVBScriptコマンドライン引数を取得するにはどうすればよいですか？

Question

.vbsファイルでコマンドライン全体を取得するにはどうすればよいですか？私はすべての特殊文字/引用符をそのまま残して、それを自分自身で処理しようとしています。

たとえば、コマンド：

WScript.Arguments.Named.Item("month") 
= April 

WScript.Arguments.Item(2) 
= Joe Smith 

Dim StrArgs 
For Each arg In WScript.Arguments 
    StrArgs = StrArgs & " " & arg 
Next 
= /month:April /price:500 Joe Smith is our guy 

これらのメソッドはすべて引用符をマングルストリップ：

cscript.exe example.vbs /month:April /price:500 "Joe Smith" is "our" guy 

は、私は興味がありません。

/月：4月/価格：500 "ジョー・スミスは"

Answer 1

あなたが使用することができます "私たち" 男であるWMI

は、私がどのような方法で未処理の生の引数を取得したいです：

Option Explicit 

Const wbemFlagReturnImmediately = &h10 
Const wbemFlagForwardOnly = &h20 

Dim oWMI : Set oWMI = GetObject("winmgmts:\\.\root\CIMV2") 
Dim oCol : Set oCol = oWMI.ExecQuery(_ 
    "SELECT Commandline FROM Win32_Process", _ 
    "WQL", wbemFlagReturnImmediately + wbemFlagForwardOnly) 
Dim oElm 
For Each oElm In oCol 
    If Instr(oElm.CommandLine, "40056204.vbs") Then 
     WScript.Echo "CommandLine: " & oElm.CommandLine 
    End If 
Next 

出力：

cscript 40056204.vbs /month:April /price:500 "Joe Smith" is "our"  guy 
CommandLine: cscript 40056204.vbs /month:April /price:500 "Joe Smith" is "our"  guy