var mailObj = WScript.CreateObject("CDO.Message");
var schema  = "http://schemas.microsoft.com/cdo/configuration";
 
mailObj.Subject = "テストメール";
mailObj.From = "hogehoge@fugafuga.co.jp";
mailObj.To   = "warawara@fugafuga.co.jp";

mailObj.TextBody = "テストメッセージです!";
mailObj.TextBodyPart.Charset ="ISO-2022-JP";

mailObj.Configuration.Fields.Item(schema+"/sendusing")        = 2;
mailObj.Configuration.Fields.Item(schema+"/smtpserver")       = "mail.fugafuga.co.jp"; // smtp host
mailObj.Configuration.Fields.Item(schema+"/smtpserverport")   = 25;                    // smtp port
//mailObj.Configuration.Fields.Item(schema+"/smtpusessl")       = true;                  // use ssl


// use SMTP Auth
// mailObj.Configuration.Fields.Item(schema+"/smtpauthenticate") = 1;
// mailObj.Configuration.Fields.Item(schema+"/smtpusessl")       = true;
// mailObj.Configuration.Fields.Item(schema+"/sendusername")     = "smtp user-id";
// mailObj.Configuration.Fields.Item(schema+"/sendpassword")     = "smtp-password";

mailObj.Configuration.Fields.Update();
mailObj.Send();