Windows2K使用公共的SMTP服务器来发送邮件

使用公共的SMTP服务器来发送邮件

1)安装SMTP协议
/*jobs.vbs*/
###########################
Set objEmail = CreateObject("CDO.Message")
objEmail.From = ""
objEmail.To = ""
objEmail.Subject = "TEST"
objEmail.Textbody = "TEST"
objEmail.Configuration.Fields.Item _
    ("") = "auto_mail"
objEmail.Configuration.Fields.Item _
    ("") = ""
objEmail.Configuration.Fields.Item _
    ("") = 2
objEmail.Configuration.Fields.Item _
    ("") = "192.168.1.168"
objEmail.Configuration.Fields.Item _
    ("") = 25
objEmail.Configuration.Fields.Update

objEmail.Send
Set objEmail=Nothing
###########################

 

2)运行jobs.vbs发送邮件
/*run jobs.vbs*/
wscript failed_jobs.vbs