LOTUSSCRIPT/COM/OLE CLASSES
Examples: OnUnload event
1. This OnUnload event verifies that the user wants to exit.
%INCLUDE "lsconst.lss"
Sub Onunload(Source As Notesuidocument, _
Continue As Variant)
If Messagebox _
("Do you really want to exit?", _
MB_YESNO, "Exit?") = IDNO Then
Continue = False
End If
End Sub
2. This OnUnload event mails the current document to whomever is listed in the SendTo field if the user so wishes.
%INCLUDE "lsconst.lss"
Sub Onunload(Source As Notesuidocument, _
Continue As Variant)
If Messagebox _
("Do you want to mail this document?", _
MB_YESNO, "Exit?") = IDYES Then
Call Source.Send
End If
End Sub
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa