Hola, necesito lanzar una aplicación secundaria (.exe) desde una aplicación VBasic 6 y además necesito comprobar si dicha aplicación secundaria esta ejecutándose o ha sido cerrada, en ese caso se debe volver a lanzar indefinidamente, pero sólo debe haber una instancia de dicha aplicación secundaria, lo mismo que la principal.
Algo parecido a esto, pero k no se ejecuten multiples instancias a la vez de la aplicación miprograma.exe.
Public Sub Main()
Dim i As Integer
i = 1
Do While i = 1
If App.PrevInstance = True Then
ExitProcess App.hInstance
Else
Shell "c:\app\miprograma.exe
End If
Loop
End Sub
Saludos
