メールの本文にテーブルのデータを書き込む

質問

ご質問させて頂きます。
access2000、ＡＤＯを使用しています。

Ａテーブルに以下のようなデータがあります。
１　りんご
２　バナナ
３　みかん

このデータを使って
以下のようなメールをお送りしたいのです。
－－－－－－－－－－－－－－－－－
件名　果物について
本文
お世話になっています。
果物について以下の通りです。

１　りんご
２　バナナ
３　みかん
－－－－－－－－－－－－－－－－－

ご教授して頂けたら幸いです。

回答No.1

ribisi · ベストアンサー

メールクライアントは何をお使いですか。
以下のような手順がまず思い浮かびます。

Outlook2000のVBAからADOでAccessに接続し、適切なクエリーを発行してレコードセットを取得する。
それをテキスト処理をしてメール本文とし、メールアイテムを作成する。

メールアイテムは
Dim olMailMessage As MailItem
Set olMailMessage = CreateItem(olMailItem)
として、このmailItemオブジェクトのインスタンスのプロパティをセットすることで作成できます。

お礼

ご返事有り難うございました。
とても参考になりました。