(PREGUNTA) Capturar cuando se cierra un programa

[aldo1982]

hola gente, bue un cliente me pidió ke keria saver fecha y hora de cuando se cierra el ciber control 5.0 y se me ocurrio ofrecerle un programa en VB ke alamcene en una DB la cant de veces ke se cierra el Ccontrol...pero mi pregunta es la siguiente ¿como hago para saver cuando se cerró el programa XXXXX en micaso el ciber control 5.0 ?
bue me seria de gran ayuda una manito

salu2 y gracias

[LeandroA]

Hola Aldo lo puedes hacer mediante "FindWindow" y porsupuesto con el "classname" del "ciber control 5.0" (si no sabes como obtenerlo te explico)

yo te paso un ejemplo con internet Explorer, su className es "IEFrame" bien cuando se inicie creara un archivo Eventos.txt en C:\ e ira imprimiendo cuando se abre y se cierra

agrega un timer y el codigo

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Dim Abierto As Boolean
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Dim mWnd As Long
Dim ClassName As String
ClassName = "IEFrame" 'aqui cambia por el classname de el "ciber control 5.0"
mWnd = FindWindow(ClassName, vbNullString)

If mWnd = 0 Then
If Abierto Then
Open "C:\Eventos.txt" For Append As #1
Print #1, "Fin de la Aplicacion Internet Explorer " & vbTab & vbTab & Now
Print #1, "-------------------------------------------------------------------"
Close #1
Abierto = False
End If
Else
If Not Abierto Then
Open "C:\Eventos.txt" For Append As #1
Print #1, "Inicio de la Aplicacion Internet Explorer " & vbTab & Now
Close #1
Abierto = True
End If
End If
End Sub


Saludos

[David]

Creo que sería mejor obtener el ProcessID del Ciber Control pues este no tiene una ventana, sino varias, entonces puede que tengan Clases Diferentes, mientras que si buscamos por el ProcessID y lo obtenemos, así no habrá problemas pues la Búsqueda solo devolverá 0 cuando el PROCESO haya finalizado....

[GeoAvila]

yo lo haría con el getprocess y estaría revisando a cada minuto.. o cada 30 segundos dependiendo..

nos vemos..

[LeandroA]

Iniciado por David el Grande

Creo que sería mejor obtener el ProcessID del Ciber Control pues este no tiene una ventana, sino varias, entonces puede que tengan Clases Diferentes, mientras que si buscamos por el ProcessID y lo obtenemos, así no habrá problemas pues la Búsqueda solo devolverá 0 cuando el PROCESO haya finalizado....

si en verdad no conosco el civer control, no sabia que eran varias ventanas me parecio que este ejemplo era mas sensillo asi, pero si en ese caso seria mejor utilizar el ProcessID

Saludos

[aldo1982]

ue gracias a tod2 por contestar mi duda..y bue entre tantas ideas tendré ke ver como mesclarlas ejejejej gracias..pero el idproces como lo invóco ?

[aldo1982]

Iniciado por David el Grande

Creo que sería mejor obtener el ProcessID del Ciber Control pues este no tiene una ventana, sino varias, entonces puede que tengan Clases Diferentes, mientras que si buscamos por el ProcessID y lo obtenemos, así no habrá problemas pues la Búsqueda solo devolverá 0 cuando el PROCESO haya finalizado....

hola david,,,, bue te pregunto...como obtendria el proccesID del ciber control ??? se podria hacer mediant codigo VB para obtener el id de los programas abiertos y la descripcion del programa abierto ? ?

[aldo1982]

??????????????