戻る

メールアドレスを指定してメールソフトを起動する方法 (Windows2000)
動作環境 Windows2000 開発環境 Visual Basic 6.0 (+SP5)
説明 cmd.exe の内部コマンド start を利用しています。
(詳しくはWindows2000付属のヘルプ"コマンドリファレンス"をご参照ください。)
用意するもの：標準フォーム(Form1)、コマンドボタン(Command1)、コンボボックス(Combo1)


Private Sub Command1_Click()

'メーラーを起動し、コンボボックスで選択されたメールアドレスを送信先(宛先)として表示させます。
 Shell Environ$("COMSPEC") & " /C start mailto:" & Combo1.Text, vbHide

'Environ$("COMSPEC")により、オペレーティング システムの環境変数から cmd.exe のパスを取得しています。

End Sub

Private Sub Form_Load()

Combo1.Text = "リストからメールアドレスを選択してください"
Combo1.AddItem "yrk00325@nifty.com"
Command1.Caption = "メーラーを起動"

End Sub