例: Accessing a document

次の例は、URL から文書を取り出します。

Sub Initialize  
  Dim session As New NotesSession
  Dim db As NotesDatabase
  Dim doc As NotesDocument
  Set db = session.CurrentDatabase
  Set doc = db.GetDocumentByURL _
    ("http://www.xyz.net/profiles.nsf/f84c48e2e59
    4b4338525665e0056fba4/0f3e22f4ea8746068525666
    e005adde0?OpenDocument")
End Sub