[VBS] Utilizar parámetros desde línea de comandos?

[Hartwell]

Hola,

Quisiera saber si es posible ejecutar un vbscript desde cmd utilizando parámetros.

Por ejemplo, quiero descargar un archivo y mi idea es ejecutar la siguiente linea:

Código [Seleccionar] Expandir

cscript.exe download.vbs [url] [output]

Aplicandolo a un código simple como el siguiente:

Código [Seleccionar] Expandir

strSource = "http://www.google.com/images/logo.gif"
strDest = "c:\logo.gif"
set HTTP = CreateObject("Microsoft.XMLHTTP")
HTTP.open "GET", strSource, False
HTTP.send
set Stream = createobject("adodb.stream")
Const adTypeBinary = 1
Const adSaveCreateNotExist = 1
Const adSaveCreateOverWrite = 2
Stream.type = adTypeBinary
Stream.open
Stream.write HTTP.responseBody
Stream.savetofile strDest, adSaveCreateOverWrite
set Stream = nothing
set HTTP = nothing

La finalidad no es para malware, pero supongo que aquí me pueden ayudar.

Saludos.

[Eleкtro]

Quisiera saber si es posible ejecutar un vbscript desde cmd utilizando parámetros.

Si, se puede.

↠ Arguments Property (WScript Object)

Código (vb) [Seleccionar] Expandir

Set Arguments = WScript.Arguments

If Arguments.Count <> 2 Then
  WScript.Echo "Cantidad de parámetros incorrecta."
  WScript.Quit(1)

Else
  strSource = WScript.Arguments(0)
  strDest = WScript.Arguments(1)
  ' Resto del código aquí...
 
End If

Saludos.

[Hartwell]

Buenísimo!

Y cómo sería el %1 y %2 para reemplazar [url] y [output]?

Código [Seleccionar] Expandir

strSource = "[url]"
strDest = "[output]"

Me podrías dar un ejemplo por favor.

[Eleкtro]

Y cómo sería el %1 y %2 para reemplazar [url] y [output]?

Me podrías dar un ejemplo por favor.

Arriba te puse el ejemplo mostrándote como se asignarían los argumentos a esas variables... ¿lo has mirado?.

Respecto a las variables especiales %1 y %2 de Batch, porfavor, olvída ese modo de ver las cosas en la programación, de todas formas este es el equivalente:

Código [Seleccionar] Expandir

%1 = WScript.Arguments(0)
%2 = WScript.Arguments(1)

Saludos!

[Hartwell]

Es verdad, que despistado... Muchas gracias!