ejecutar boton comando de otro exe desde VB6

[tattojk]

Cordial Saludo..
tengo un caso muy particular; debo abrir un programa .exe desde VB 6; eso ya
lo hago perfectamente pero el detalle es que debo mandar a oprimir el boton
procesar de ese .exe en particular, ademas que el boton de procesar hace unos procesos y debo saber cuando termina para poder cerrar ese exe.

Alguien puede colaborarme??

Agradezco de antemano la ayuda y sugerencias que me puedan brindar.

[David]

Para que se ejecute la acción asociada a ese botón debes usar SendMessage para enviar un mensaje WM_COMMAND que indique a la ventana que debe ejecutar esa acción.

[tattojk]

Gracias por tu respuesta David.
he estado leyendo pero sirve solo con formularios del proyecto actual no con ejecutables externos.

De esta forma llamo al exe

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

Private Sub Command1_Click()
Dim res As Long
res = ShellExecute(Me.hwnd, "Open", ruta_exe, "", "", 1)
End Sub

Pero debo hacer que mande a ejecutar el boton de comando que tiene ese exe...

Alguien me puede colaborar o guiarme mejor; he hecho pruebas con SendMessage pero solo me ha funcionado con formularios del proyecto actual

Agradezco de antemano la ayuda que me puedan brindar.

[David]

SendMessage funciona con cualquier ventana. Probablemente algo estás haciendo mal y por eso no funciona. Muestra cómo has intentado para ver por qué falla.

[tattojk]

Cordial Saludo David; esto es lo que hago

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Const WM_COMMAND = &H111

Private Sub Command1_Click()
Dim Resultado As Long

Dim Texto As String

Texto = "Procesar"

Resultado = SendMessage("Cajas" WM_COMMAND, 15, ByVal Texto)

end sub

El programa exe se llama Cajas.exe y el boton el caption dice procesar.

No entiendo muy bien los parametros del sendmessage..

Agradezco de antemano la ayuda y sugerencias que me puedas brindar.

[David]

El primer parámetro no puede ser un String, debe ser el hWnd de la ventana a la que deseas enviar el mensaje. Debes usar FindWindow para obtener el hWnd de una ventana.