Autor Tema: ¿Por que no me funciona?  (Leído 4078 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Juan Luis López

  • Bytes
  • *
  • Mensajes: 30
  • Reputación: +2/-0
  • No nos mires ¡UNETE!
    • Ver Perfil
    • #spanishrevolution
¿Por que no me funciona?
« en: Julio 22, 2011, 10:51:06 am »
Hola a todos!
Tengo una carpeta en la que he guardado el ejecutable aircrack-ng y cmd.exe (de linea de comandos) y lo quiero ejecutar pero solo se me ejecuta el cmd.exe.

Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\cmd.exe", "aircrack-ng.exe", vbNullString, SW_SHOWNORMAL
que es lo que pasa?
Juventud SIN futuro. Sin casa, sin curro, sin pensión, ¡Sin miedo!

ssccaann43

  • Terabyte
  • *****
  • Mensajes: 970
  • Reputación: +97/-58
    • Ver Perfil
    • Sistemas Nuñez, Consultores y Soporte, C.A.
Re:¿Por que no me funciona?
« Respuesta #1 en: Julio 22, 2011, 02:20:29 pm »
Ejecutalos así
Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\cmd.exe", App.Path & "\Apps\aircrack-ng.exe", vbNullString, SW_SHOWNORMAL

o por separados

Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\cmd.exe", vbNullString, SW_SHOWNORMAL

ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\aircrack-ng.exe", vbNullString, SW_SHOWNORMAL
Miguel Núñez.

ADONAIRAFA

  • Gigabyte
  • ****
  • Mensajes: 291
  • Reputación: +37/-1
  • Que bien se siente al terminar un programa !!!
    • Ver Perfil
Re:¿Por que no me funciona?
« Respuesta #2 en: Julio 22, 2011, 02:39:58 pm »
Código: [Seleccionar]
o por separados

ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\cmd.exe", vbNullString, SW_SHOWNORMAL

ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\aircrack-ng.exe", vbNullString, SW_SHOWNORMAL

De acuerdo con Ssccaann43 en la segunda opción, por que a esa API, según los parámetros que recibe, solo recibe un ejecutable (o archivo que quieras abrir):

Private Declare Function ShellExecute Lib "shell32.dll" Alias"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
    ByVal lpFile As String, ByVal lpParameters As String, _
    ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Y si no estás de acuerdo ::) demanda a Microsoft (no, una broma, Je, Je, Je  ;D)

Saludos !!!
Manuel F. Borrego S. 8)
Barcelona. Venezuela.
« última modificación: Julio 22, 2011, 03:41:32 pm por ADONAIRAFA »
Hay dos tipos de personas: Los que siguen un camino... y los que hacen camino al avanzar !!!

xkiz ™

  • Moderador Global
  • Gigabyte
  • *****
  • Mensajes: 283
  • Reputación: +30/-11
    • Ver Perfil
    • xkiz ™
Re:¿Por que no me funciona?
« Respuesta #3 en: Julio 22, 2011, 07:17:58 pm »
por que ejecutas cmd y como parametro le pasas el otro exe, si ejecutas el parametro como como primario ?
Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\aircrack-ng.exe", vbNullString, vbNullString, SW_SHOWNORMAL

ADONAIRAFA

  • Gigabyte
  • ****
  • Mensajes: 291
  • Reputación: +37/-1
  • Que bien se siente al terminar un programa !!!
    • Ver Perfil
Re:¿Por que no me funciona?
« Respuesta #4 en: Julio 25, 2011, 12:03:28 am »
C.D.S.M. !!! >:( >:( >:(

Al parecer otro 'Spamer', el de arriba !!!  >:( >:( >:(

Manuel F. Borrego S. 8)
Barcelona, Edo. Anzoátegui. Venezuela.

PD: Si no, mil perdones, ¿pero que hace un anuncio
      de zapatos femeninos, en este Post y en este foro?
Hay dos tipos de personas: Los que siguen un camino... y los que hacen camino al avanzar !!!

Juan Luis López

  • Bytes
  • *
  • Mensajes: 30
  • Reputación: +2/-0
  • No nos mires ¡UNETE!
    • Ver Perfil
    • #spanishrevolution
Re:¿Por que no me funciona?
« Respuesta #5 en: Julio 25, 2011, 10:05:14 am »
Sigue sin funcionar:
Yo creo que lo mas logico es:
Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\aircrack-ng.exe", "--help", vbNullString, SW_SHOWNORMALPara que se me muestre la ayuda de aircrack en pantalla.

La razon por la que ejecuto cmd.exe y como parametro aircrack es que si ejecuto aircrack directamente, sale la ventana de shell pero se cierra al instante y lo que quiero es abrir cmd.exe y que desde ahi se abra aircrack-ng.

Código: [Seleccionar]
ShellExecute Me.hwnd, vbNullString, App.Path & "\Apps\cmd.exe", "App.Path & "\Apps\aircrack-ng.exe --help", vbNullString, SW_SHOWNORMAL
Gracias de todas formas
Juventud SIN futuro. Sin casa, sin curro, sin pensión, ¡Sin miedo!