下記のような、スクリプトを用いて、csvファイルからの読み込みは成功したのですが、フォ−ム作成画面中にボタンを押し、デ−タを読み込んでくるのですが、フォ−ム作成画面中に読み込んだデ−タが表示されなくて困っています。 誰かわかるかた、是非教えて下さい。 Notes オブジェクトの宣言 Dim session As New NotesSession Dim workspace As New NotesUIWorkspace Dim db As NotesDatabase Dim doc As NotesDocument 'データ変数の宣言 Dim Filenum As Integer Dim strFilename As String Dim data(5) As String Dim Cnt As Integer 'Notesオブジェクトの初期化 Set db = session.CurrentDatabase 'CSVの取り込み Filenum = Freefile() strFilename = "C:\Tmp\Ren.txt" Open strFilename For Input Access Read As Filenum If Len(strfilename) Then Do While Not Eof(Filenum) For Cnt = 1 To 5 Input #Filenum,data(Cnt) Next Set doc = db.Createdocument doc.Form = "CSVForm" doc.CSV1 = data(1) doc.CSV2 = data(2) doc.CSV3 = data(3) doc.CSV4 = data(4) doc.CSV5 = data(5) Call doc.Save(False, False) Loop Close Filenum Call workspace.ViewRefresh End If