|   |   | 
You can use the "specialType" field of the NotesItem type:
Dim variableName As New NotesItem( notesDocument, name$, value [,specialType%])
Dim TAuthor As New NotesItem(doc, "Author", Auths, AUTHORS) TAuthor.IsSummary = True
 Notes R3
Notes R3  Notes R4
Notes R4  Notes/Domino 4.5
Notes/Domino 4.5  Notes/Domino 4.6
Notes/Domino 4.6  Notes/Domino R5
Notes/Domino R5