Outlook Expressの操作について

質問

ヘルプを見たのですが、分からなかったので質問です。
Private Sub Command1_Click()
Ret=Shell("C:\Program File\Outlook Express\msimn.exe/mailurl:mailto:宛先&bcc=宛先&subject=件名&body=本文%20")
End Sub
とかいてOutlook Expressを起動させています。アドレス登録画面も作りました。テキストボックスに登録したアドレスを表示させ、コマンドボタンをクリックしたときに、メールの宛先に入れたいのですが、どうしたらよいのでしょうか？よろしくお願いします。

回答No.1

Kuppycat · ベストアンサー

Ret=Shell("C:\Program File\Outlook Express\msimn.exe/mailurl:mailto:" & Text1.Text & "&bcc=" & Text1.Text & "&subject=件名&body=本文%20")

で、よいと思う...

補足

すみません。言葉がたりないようでしたので、、メールを起動させるコマンドボタンがあるフォームとアドレスを宛先に送るコマンドボタンがあるフォームは別です。送っていただいたソースは起動する時に全て入れるものでしょうか？すみませんがよろしくお願いします。

回答No.2

1050 円（@1050YEN）

疑問があります。
・OE限定なのですね？
・起動後になぜ置換しなければならないかが、非常に不自然に感じます。

でもOE限定を前提に実現方法はあります。

共有メモリを確保し、API関数SendMessageとWM_GETTEXT/WM_SETTEXTの組み合わせで、できるはずです。
http://okweb.jp/kotaeru.php3?q=817941
に、共有メモリ確保forNT系モジュールが提供されています。