例: Parent property (NotesNewsletter - LotusScript®)

次の Visual Basic コードは NotesNewsletter オブジェクトの親ユーザー名を表示します。

Private Sub NewsParent_Click()
Dim s As New NotesSession
s.Initialize
Dim news As NotesNewsletter
Dim dir As NotesDbDirectory
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Set dir = s.GetDbDirectory("")
Set db = dir.OpenDatabase("Web test")
Set dc = db.AllDocuments
Set news = s.CreateNewsletter(dc)
MsgBox news.Parent.UserName, , "Parent user name"
End Sub