LOTUSSCRIPT/COM/OLE CLASSES

Examples: WindowTitle property
This form action script prompts the user with a dialog box before deleting the current document. (The action displays only when the current document is in Read mode, since documents can't be deleted while in Edit mode.)

Sub Click(Source As Button)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Dim choice As String
 Set uidoc = workspace.CurrentDocument
 choice = Inputbox( "Do you want to delete " +  _
 uidoc.WindowTitle + "?","" )
 If ( choice = "yes" ) Or ( choice = "y" ) Then
   Call uidoc.DeleteDocument
 End If
End Sub

See Also