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