次のスクリプトは、CompanySite というアウトラインを作成します。
Dim session As New NotesSession Dim db As NotesDatabase Dim outline As NotesOutline Set db = session.CurrentDatabase Set outline = db.CreateOutline("CompanySite")