VB6からOutlookExpressを起動し、メールを受信する方法について

ADB 2004-09-10 18:27:04 No: 116268

お世話になります。

VB6.0にて、コマンドボタン押下後
①OutlookExpressを起動
②「すべて受信」を実行
という流れで処理を行いたいのですが、②の処理方法が良く分かりません。

ご教授願えませんでしょうか？
宜しくお願い致します。

リベロ 2004-09-15 01:31:49 No: 116269

コンポーネントのMicrosoft MAPI Controls 6.0を追加して
画面に二つコントロールを貼り付けて下さい。
Private Sub Command1_Click()
  Shell "アウトルック", 1

    MAPISession1.SignOn
    MAPIMessages1.SessionID = MAPISession1.SessionID
    MAPIMessages1.Compose
    MAPISession1.SignOff
  End With
End Sub
これで平気だとは思いますが自己責任でお願いします。