Ver Mensaje Individual
  #5 (permalink)  
Antiguo 04/08/2009, 17:58
franko1809
 
Fecha de Ingreso: enero-2008
Ubicación: Lima - Perú
Mensajes: 1.127
Antigüedad: 17 años, 6 meses
Puntos: 10
Respuesta: Ejecutar funcion al cerrarse el programa

El evento QueryUnload solo funciona al finalizar la tarea, pero si termino el proceso abruptamente con el comando taskkill no me guarda nada.

Aparte de ese problema tambien no me guarda el contenido del texbox al apagarse el computador con "power" o quitando el cable de energia, es posible lograr lo que se hace en word es decir cuando falla la energia te guarda un copia temporal, aunque me parece que word hace ese proceso periodicamente por que no te recupera el file al 100%

En fin si mo se puede ni modo tendre que guardar el texbox cada x tiempo, aun asi faltaria resolver como hacer cuando se utiliza el comando taskkill del D.O.S

Código:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
'vbFormCode         1   Unload method invoked from code.
'vbAppWindows       2   Current Windows session ending.
'vbFormMDIForm      4   MDI child form is closing because the MDI form is closing.
'vbFormControlMenu  0   User has chosen Close command from the Control-menu box on a form.
'vbAppTaskManager   3   Windows Task Manager is closing the application.

    Select Case UnloadMode

    Case 0
    MsgBox "no se puede cerrar 0"
    Cancel = True
    
    Case vbAppTaskManager
    Call Grabar_estado
    MsgBox "no se puede cerrar 3"
    Cancel = True

    End Select

End Sub