作成者	カテゴリ	返答の対象		公開
�Mマイク 02/13/2004 01:13 PM		☆☆承認ワークフローのメール宛先に、ＣＣを追加したい☆☆

ＮＡＧさん、返信ありがとうございます。

早速、ＮＡＧさんの返信に従って、組みなおしてみました。

以下です（↓）
Sub SendNotification


Print "通知送信"

'maildoc のｵﾌﾞｼﾞｪｸﾄ変数である note と、その Bodyﾌｨｰﾙﾄﾞを作成し裏付けします。
Set maildoc = New NotesDocument(db)
Set rtitem = New NotesRichTextItem(maildoc, "Body")
DueDate = note.DueDate
Msgbox"aa"
ccname = doc.FieldGetText("cc")　←こちらにしました
'ccname = doc.cc

Msgbox"ＣＣなし"

そして、実行してみたのですが、ｴﾗｰの内容は変わりませんでした。。。

直前のﾒｯｾｰｼﾞﾎﾞｯｸｽで"aa"というのを入れてみたのですが、
そのﾒｯｾｰｼﾞの直後にｴﾗｰが出ているようですので、
やはり"ｃｃ"の取得に失敗しているように見受けられます。

毎回、お手数お掛けして申し訳ございませんが、
もう少しだけ、教えてください。

よろしくお願いいたします。