LOTUSSCRIPT /COM/OLE のクラス
Private Sub DbParent_Click() Dim s As New NotesSession s.Initialize Dim db As NotesDbDirectory Set db = s.GetDbDirectory("") MsgBox db.Parent.UserName, , "Parent user name" End Sub
関連項目