WindowsNT OptionPackに付属のSMTPサービスを使用してのメール送信のVBSのサンプルです。
Dim MyMail
Set MyMail = Server.CreateObject("CDONTS.NewMail")
body = "ここに本文"
body = body & chr(10) & "改行" & chr(10)
MyMail.From = "hogehoge@xxxxxx.or.jp" ' メール送信元アドレス
MyMail.to = "hogehoge@xxxxxx.or.jp" ' メール送信先アドレス
MyMail.subject = "タイトル"
MyMail.body = body
MyMail.send
OptionPackのSMTPですが、インストール後設定する項目は特にありません。メール等がうまく送信されない場合は、DNSサーバーのMXレコードが設定されているかなど、
通常のSMTPと同等の項目を確認してください。
