作成者カテゴリ 
公開
つちや
10/23/2001 11:19 AM
ビュー
ノーツサーバノーツクライアントサーバOSクライアントOSネットワークプロトコル
4.6x4.6xWindowsNT 4.0Windows 95TCP/IP

Word差し込み印刷の操作について

みなさんはじめまして、
いつも参考にさせていただいております。

どうしても、解決できないことがありましたので
ご相談させてください。

ノーツの一覧よりデータをTextファイルで保存し
MS-WORD98を操作して、既存のWordファイルと
保存したTextファイルで、
差し込み印刷を行おうとしております。
そこで、差し込み印刷部分に下記のスクリプトを書きましたが、
※印部分で、下記のメッセージが表示されてしまいます。

ダイアログタイトル:ODBC Textドライバログインの失敗
内容:インストール可能なISAMドライバが見つかりませんでした。
ボタン:[OK],[キャンセル]

ここで、[キャンセル]をクリックすると、差し込み印刷ができますが、
できれば、ダイアログメッセージを出ないように回避したいのです。

↓差し込み印刷部分スクリプト
Dim obj As Variant
Dim wdoc As Variant

Set obj = CreateObject("Word.Application")
obj.Visible = False
obj.Documents.Open("C:\Test.doc")
Set wdoc = obj.Documents("Test.doc")
※wdoc.MailMerge.OpenDataSource "C:\Data.txt"
wdoc.MailMerge.Execute
wdoc.Close
obj.Visible = True

どなたかご存知の方いらっしゃいましたら
教えていただけませんでしょうか。
よろしくお願いいたします。


[Previous Main Document]
Word差し込み印刷の操作について (つちや) * 現在地 *
[Next Main Document]