那位大哥大姐给小弟解释一下这段代码啊
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/07/20 12:15:18
那位大哥大姐给小弟解释一下这段代码啊
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "admin1@fabrikam.com"
objEmail.To = "admin2@fabrikam.com"
objEmail.Subject = "Server down"
objEmail.Textbody = "Server1 is no longer accessible over the network."
objEmail.Configuration.Fields.Item _
objEmail.Configuration.Fields.Item _
"smarthost"
objEmail.Configuration.Fields.Item _
objEmail.Configuration.Fields.Update
objEmail.Send
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "admin1@fabrikam.com"
objEmail.To = "admin2@fabrikam.com"
objEmail.Subject = "Server down"
objEmail.Textbody = "Server1 is no longer accessible over the network."
objEmail.Configuration.Fields.Item _
objEmail.Configuration.Fields.Item _
"smarthost"
objEmail.Configuration.Fields.Item _
objEmail.Configuration.Fields.Update
objEmail.Send
![那位大哥大姐给小弟解释一下这段代码啊](/uploads/image/z/16932131-35-1.jpg?t=%E9%82%A3%E4%BD%8D%E5%A4%A7%E5%93%A5%E5%A4%A7%E5%A7%90%E7%BB%99%E5%B0%8F%E5%BC%9F%E8%A7%A3%E9%87%8A%E4%B8%80%E4%B8%8B%E8%BF%99%E6%AE%B5%E4%BB%A3%E7%A0%81%E5%95%8A)
设置一个邮件然后发送.
邮件从admin1@fabrikam.com发给admin2@fabrikam.com,主题是Server down,内容是Server1 is no longer accessible over the network.
smtp服务器名是smarthost,端口25
邮件从admin1@fabrikam.com发给admin2@fabrikam.com,主题是Server down,内容是Server1 is no longer accessible over the network.
smtp服务器名是smarthost,端口25