WSHでメール送信 | Windows - オレのメモ(仮)ＧＰＯ適用時にエラーだったらメールを飛ばす...とか色々と使えそうなのでmemoしておきます。 Ｇｍａｉｌとか、外部のＳＭＴＰ鯖も使えます。Ｇｏｏｇｌｅから何か言われるかもしれませんが。 以下ソース。 [ mail.vbs ] --------------------- Option Explicit Sub mail_send() Dim oMsg Dim schemas Set oMsg = CreateObject("CDO.Message") schemas = "http://schemas.microsoft.com/cdo/configuration/" oMsg.From = "hogefuga@gmail.com" oMsg.To = "test@example.com" oMsg.Subject = "Test " oMsg.TextBody = "テストメッセージです
