2013-08-01 24 views
6

Sto cercando di unire gli argomenti a una stringa da passare a un altro script. Il seguente:VBScript come unire WScript.Arguments?

WScript.Echo(Join(WScript.Arguments)) 

mi dà un errore:

Error: Wrong number of arguments or invalid property assignment 
Code: 800A01C2 

Cosa c'è di sbagliato in questo la sintassi?

risposta

8

WshArgument oggetti non sono matrici, quindi non è possibile utilizzare Join() su di essi. Che cosa si può fare è qualcosa di simile:

ReDim arr(WScript.Arguments.Count-1) 
For i = 0 To WScript.Arguments.Count-1 
    arr(i) = WScript.Arguments(i) 
Next 

WScript.Echo Join(arr) 
2

Un'altra soluzione può essere fatto con oggetto ArrayList dal sistema:

Set oAL = CreateObject("System.Collections.ArrayList") 
For Each oItem In Wscript.Arguments: oAL.Add oItem: Next 
WScript.Echo Join(oAL.ToArray, " ")