ありがとうございました。 Dim db As NotesDatabase Dim session As New NotesSession Dim webdoc As NotesDocument Dim newdoc As NotesDocument '現在の文書 Set db = session.CurrentDatabase Set webdoc = session.DocumentContext 省略 newdoc.SendUser=webdoc.Remote_User(0) で無事にできました。 CGI変数は考えることもできませんでした。 どうもありがとうございました。