新建文件
Dim ss As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = ss.CurrentDatabase
Set doc = db.CreateDocument()
Call doc.ReplaceItemVale(" 欄位名稱 ", " 欄位值 ")
Call doc.Save(True, False)
Dim ss As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = ss.CurrentDatabase
Set doc = db.CreateDocument()
Call doc.ReplaceItemVale(" 欄位名稱 ", " 欄位值 ")
Call doc.Save(True, False)