vbs如何实现sendmail发邮件带附件-创新互联

小编给大家分享一下vbs如何实现sendmail发邮件带附件,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

成都创新互联不只是一家网站建设的网络公司;我们对营销、技术、服务都有自己独特见解,公司采取“创意+综合+营销”一体化的方式为您提供更专业的服务!我们经历的每一步也许不一定是最完美的,但每一步都有值得深思的意义。我们珍视每一份信任,关注我们的做网站、成都网站设计质量和服务品质,在得到用户满意的同时,也能得到同行业的专业认可,能够为行业创新发展助力。未来将继续专注于技术创新,服务升级,满足企业一站式成都营销网站建设需求,让再小的品牌网站设计也能产生价值!
NameSpace = "/tupian/20230522/error.aspx
Set Email = CreateObject("CDO.Message") 
Email.From = "zzzevazzz@21cn.com" 
Email.To = "zzzevazzz@126.com" 
Email.Subject = "Test sendmail.vbs" 
Email.Textbody = "OK!" 
Email.AddAttachment "C:\foo.zip" 
With Email.Configuration.Fields 
.Item(NameSpace&"sendusing") = 2 
.Item(NameSpace&"smtpserver") = "smtp.21cn.com"  
.Item(NameSpace&"smtpserverport") = 25 
.Item(NameSpace&"smtpauthenticate") = 1 
.Item(NameSpace&"sendusername") = "zzzevazzz" 
.Item(NameSpace&"sendpassword") = "ph5nt0m!" 
.Update 
End With 
Email.Send

以上是“vbs如何实现sendmail发邮件带附件”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


网页标题:vbs如何实现sendmail发邮件带附件-创新互联
本文链接:http://ybzwz.com/article/djhohs.html