Paso de parámetros a aplicación

Les
24 de Abril del 2005
Hola, ¿qué tal?

Necesitaría que alguien me indicara cómo puedo hacer para que un programa en Visual Basic 6 acepte argumentos al ejecutarlo. Es decir, que lo pueda llamar de una forma similar a: Programa.exe -targ1 -targ2

Muchas gracias de antemano.

en?
24 de Abril del 2005
Les,

Private Sub Form_Load()
Dim Argumentos() As String
Dim Argumento As Variant

Argumentos = Split(Command)
For Each Argumento In Argumentos
MsgBox Argumento
Next
End Sub

En tu ejemplo devolvería:
Argumentos(0) = "-targ1"
Argumentos(1) = "-targ2"

__
Un saludo.

Les
24 de Abril del 2005
¡Muchas gracias, funciona perfectamente!

Un saludo...

en?
24 de Abril del 2005
Una cosa que olvidé comentar, busca en la ayuda la definición de la sintaxis de la función Split para saber lo que hace exactamente.

En el ejemplo que te he puesto yo, se asume que los argumentos llegarán separados por un espacio en blanco. Pero supongamos que los propios argumentos contienen un espacio:

EjecutarPrograma.exe "-targ1 primero" "-targ2 segundo"

Obtendrías un resultado indeseado. En este caso lo lógico sería usar la 'coma' como separador, y la instrucción debería ser:

Argumentos = Split(Command, ",")

Siendo ejecutado:
EjecutarPrograma.exe -targ1 primero,-targ2 segundo

Revisa la ayuda ;-)

__
Un saludo.

Les
24 de Abril del 2005
Así lo haré, muchas gracias.

fer
24 de Abril del 2005
la verdad es que no se