Ejecutar funcion al cerrarse el programa

[franko1809]

He probado en el evento unload y terminate y es lo mismo.

Lo que mi funcion hace es guardar el contenido de un textbox en un archivo de texto al cerrar el programa, pero si alguien termina el proceso desde el administrador de tareas no me graba nada supongo que lo mismo pasara si la energia falla.

Como hago para que en cualquier caso de estos siempre puede guardar la informacion del texbox?

[agus0]

Hace que la informacion se guarde a medida que vas editando el texto... es lo mejor que se me ocurre xD

[Judgement]

Saludos, la respuesta a tu problema se encuentra en el evento QueryUnload

Ya que aqui puedes cancelar el cierre de la ventana, y además saber como es que estan cerrando tu ventana; ya sea por darle click a la X, o desde código, o se esta terminando el programa, o si estan usando el administrador de tareas.

Aqui te consegui un link hacerca de este evento
http://msdn.microsoft.com/en-us/libr...8VS.60%29.aspx

Espero que te sea de utilidad

[franko1809]

bueno lo revisare y espero solucionar, saludos a los 2

[franko1809]

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

[ema21del9]

Se me ocurre que vayas guardando a traves de un timer seteado en 3 segundos, lo que creas que es lo mas correcto, en un archivo temporal, y que tenga una variable del tipo "bandera" seteado en 1 si no se termino la tarea deseado para la aplicacion.

Ahora si justo se corto la luz, cuando vuelvo a abrir la aplicacion, si la bandera esta en 1 (osea que no se termino de realizar la tarea deseada), aviso con un msjbox y muestro lo que se guardo hasta el momento, me parece lo mas correcto.

Si queres que sea extremadamente sensible podes incluso hacerlo en la accion change de la caja de texto, de manera que cada accion que se realice en la misma se vaya guardando en el archivo temporal.

[LeandroA]

porque no lo haces en el evento

Private Sub Text1_LostFocus()

End Sub

o talvez en

Private Sub Text1_Validate(Cancel As Boolean)

End Sub

[abel_c_b]

Iniciado por ema21del9

Se me ocurre que vayas guardando a traves de un timer seteado en 3 segundos, lo que creas que es lo mas correcto, en un archivo temporal, y que tenga una variable del tipo "bandera" seteado en 1 si no se termino la tarea deseado para la aplicacion.

Ahora si justo se corto la luz, cuando vuelvo a abrir la aplicacion, si la bandera esta en 1 (osea que no se termino de realizar la tarea deseada), aviso con un msjbox y muestro lo que se guardo hasta el momento, me parece lo mas correcto.

Si queres que sea extremadamente sensible podes incluso hacerlo en la accion change de la caja de texto, de manera que cada accion que se realice en la misma se vaya guardando en el archivo temporal.

Creo que esto es lo que te conviene, saludos