GPO適用時にエラーだったらメールを飛ばす...とか色々と使えそうなのでmemoしておきます。 Gmailとか、外部のSMTP鯖も使えます。Googleから何か言われるかもしれませんが。 以下ソース。 [ 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 = "テストメッセージです