Examples: InPreviewPane property

This script puts the document in Edit mode if it is not being accessed from the preview pane.

Sub Postopen(Source As Notesuidocument)
  If Not source.InPreviewPane Then
    source.EditMode = True
  End If
End Sub