Visual Basic - Identificar programas abiertos

Life is soft - evento anual de software empresarial
 
Vista:

Identificar programas abiertos

Publicado por aleyda (3 intervenciones) el 09/06/2005 17:48:21
Hola a todos, es posible y con que comando saber si un usuario tiene abierto en el Windows un programa X, por ejemplo puedo saber si tiene abierto el acrobat o cualquier otro programa?
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:Identificar programas abiertos

Publicado por SetFocus (183 intervenciones) el 10/06/2005 04:26:54
Hola! Podes utilizar para eso la API FindWindows, para que veas el funcionamiento te dejo un ejemplo. Lo que hace es determinar si la calaculadora de windows se encuentra abierta
Para probarlo en un form agrega un boton y pega el siguiente codigo en la seccion General del form:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long

Private Sub Command1_Click()

Dim Ventana As Long

Ventana = FindWindow(vbNullString, "Calculadora")
If Ventana = 0 Then
MsgBox ("La Calculadora no esta abierta")
Else
MsgBox ("La Calculadora ya esta abierta")
End If

End Sub

Obviamante tenes que cambiar "Calculadora" por el nombre del programa que queres cerrar, es decir, lo que aparece en la barra de titulos de la ventana del programa en cuestion.
Espero te sirva.Saludos
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