Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Ketchuz en 19 Julio 2011, 23:36 pm



Título: Ejecutar aplicación con parámetros
Publicado por: Ketchuz en 19 Julio 2011, 23:36 pm
Hola a todos.
Tengo una pregunta acerca de cómo ejecutar una aplicación con parámetros en Visual Basic 6. Me explico:

Lo que deseo es que cuando se inicie mi aplicación así: "sidebar.exe /showgadgetsonly" se abra pero mostrando un formulario. Y si se abre así "sidebar.exe /checkupdates" abra otro formulario distinto, en este caso una ventana de actualización del programa.
Hace un tiempo vi cómo hacerlo en este foro, pero ya llevo tiempo buscando y no he podido dar con él.

¿Me ayudan por favor? De antemano, muchas gracias.


Título: Re: Ejecutar aplicación con parámetros
Publicado por: raul338 en 19 Julio 2011, 23:39 pm
Solo tienes que filtrar el string Command$ Ahi esta todo

Código
  1. Private Sub Form_Load()
  2.    If Command$ = "/showgadgetsonly" Then Debug.Print "Gadgets solo"
  3. End Sub
  4.  


Título: Re: Ejecutar aplicación con parámetros
Publicado por: Ketchuz en 19 Julio 2011, 23:44 pm
Gracias por tu pronta respuesta.
Código
  1.    If Command$ = "/showgadgetsonly" Then Debug.Print "Gadgets solo"
  2.  
Se puede en vez de Debug.Print "Gadgets solo" poner GadgetsForm.Show ?


Título: Re: Ejecutar aplicación con parámetros
Publicado por: raul338 en 19 Julio 2011, 23:46 pm
Se puede poner cualquier cosa... :rolleyes: solo fue un ejemplo


Título: Re: Ejecutar aplicación con parámetros
Publicado por: Ketchuz en 19 Julio 2011, 23:57 pm
Ok, sí funcionó. Pero además quisiera que si la aplicación se inició sin ningún comando se cierre o muestre un mensaje.
¿Sabes cómo hacerlo? Porque puse: If Command$ = "" Then MsgBox "Se requiere un comando" [...] Me da error :-\


Título: Re: Ejecutar aplicación con parámetros
Publicado por: raul338 en 20 Julio 2011, 00:16 am
Es raro que te de error. Debería estar en otro lugar :P


Título: Re: Ejecutar aplicación con parámetros
Publicado por: Ketchuz en 20 Julio 2011, 00:26 am
Tienes razón, el error estaba después del "then"  :rolleyes: