Ejecutar aplicacion en clipper - VB-MUNDO

Javier Enrique · #1 (**permalink**) 18-03-2005, 01:50:25

La llamada al Archivo EXE es realizada con la siguiente instrucción :

Dim i as double
i = Shell("C:\INF\guias.exe")

Operando desde Visual Basic ésta instrucción funciona correctamente, pero
la version compilada de mi aplicación solamente genera un salto de página en la impresora.

¿ Al compilar debo mencionar en alguna configuración que estoy llamando una aplicación externa ?

J.M.Movilla · #2 (**permalink**) 18-03-2005, 09:58:07

Prueba con esto
En la cabecera del Formulario o en un Módulo general:

Código:

Public 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   
Public X As Long

Y donde lo precises

Código:

X = ShellExecute(Me.hWnd, "Open", "C:\INF\guias.exe", "", "c:\", 1)

NOTA: Independientemente del tema, no abras temas nuevos cuando se trata de lo mismo que has preguntado en un post anterior, porque así no pueden seguirse los asuntos... Este mensaje tenías que haberlo puesto como [Responder] en el post primitivo... Gracias.

Javier Enrique · #3 (**permalink**) 18-03-2005, 14:24:34

Muchas gracias, habia intentado un código muy parecido, pero tratare de nuevo.
PD. No sabia como responder directamente gracias de nuevo.