作成者	カテゴリ		公開
HIDE 02/28/2007 04:21 PM	エージェント

csvからデータをインポートしています。
以前は正常に動いていたのですが
csvの列数を増やすと@Word関数のところで「Operation failed」
エラーが出てしまいます。

列数を増やした後でも各セルの文字数が少ない場合はエラーが出ず
各セルの文字数が多い場合エラーがでます。

@Wordでデータを取得する時はバイト数等の制限
があるのでしょうか？

以下にスクリプトを記します。

Dim ss As New notessession
Dim db As notesdatabase
Dim doc As notesdocument

Dim filenum As Variant
Dim filename As Variant
Dim txt As String

Set db = ss.currentdatabase

filenum = Freefile()
filename = "c:\temp\aaa.csv"

Open filename For Input As filenum

Do Until Eof(filenum)
Line Input #filenum,txt$

Set doc = New NotesDocument(db)

doc.bbb = Evaluate("@Word('" + txt + "';',';1)")