例: GetChild method (NotesView - LotusScript®)

次のスクリプトは、ビューの最初の文書に返答文書があるときに、その返答文書を取得します。

Dim db As New NotesDatabase( "Troy", "newnotes.nsf" )
Dim view As NotesView
Dim doc As NotesDocument
Dim response As NotesDocument
Set view = db.GetView( "Main View" )
Set doc = view.GetFirstDocument
Set response = view.GetChild( doc )