Visual Basic - Esperar hasta que termina aplicación DOS

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Esperar hasta que termina aplicación DOS

Publicado por Leticia Martinez (1 intervención) el 02/02/2004 20:48:59

Hola!!, como puedo hacer que visual Basic se espere hasta que termine un proceso en DOS, especificamente un proceso .bat??. Necesito que se procese serialmente, no en paralelo.

Agradecere muchisimo su ayuda....gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Esperar hasta que termina aplicación DOS

Publicado por Cecilia Colalongo (3116 intervenciones) el 03/02/2004 11:53:18
Fijate con esto:

Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long

Const STILL_ACTIVE = &H103
Const PROCESS_QUERY_INFORMATION = &H400

Dim hProcess As Long
Dim RetVal As Long
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, False, Shell("MiComando", vbMinimizedNoFocus))

Do
GetExitCodeProcess hProcess, RetVal
DoEvents
' Sleep 100
Loop While RetVal = STILL_ACTIVE
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar