■No18_VBScript メールを送る２

VBScriptとJavaScript　の２つの方法を記載する。

●VBScript (SMTPサーバーが自分の場合）
Set oMsg = CreateObject("CDO.Message")
oMsg.From = "[e-mail]"
oMsg.To = "[e-mail]"
oMsg.Subject = "Test "
oMsg.TextBody = "テストメッセージです" & vbCrLf & Now
oMsg.Send

●JScript　（SMTPが自分でない場合）
var oMsg = WScript.CreateObject("CDO.Message");
oMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")= 2;
oMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "SMTPサーバ名";
oMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25;
oMsg.Configuration.Fields.Update();
oMsg.From     = "[e-mail]";
oMsg.To       = "[e-mail]";
//oMsg.CC       = "[e-mail]";
oMsg.Subject  = "タイトル";
oMsg.TextBody = "メールの本文";
oMsg.Send();


どちらも、スクリプトファイルとして保存し、コマンドプロンプト上から

cscript　スクリプトのﾌﾙﾊﾟｽ

で実行できる。