Examples: IsSummary property

  1. This script creates a new Topic item using the extended class syntax. Items created with this syntax have a default IsSummary value of True.
    Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim item As NotesItem
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
doc.Topic = "I have something to say"
Set item = doc.GetFirstItem( "Topic" )
If item.IsSummary Then
  Messagebox _
  ( "Items created this way are automatically summmary." )
End If
Call doc.Save( False, True )
  2. This script creates a new Topic item using New. Items created with New have a default IsSummary value of False. Since you want the Topic item to display in a view, you set IsSummary to True.
    Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim item As NotesItem
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
Set item = New NotesItem _
( doc, "Topic", "I have something to say" )
item.IsSummary = True
' must specifically set this property
Call doc.Save( False, True )