标题: [问题求助] 向邮箱自动发送邮件的VBS为何出错? [打印本页]
作者: dnvplj 时间: 2013-7-28 09:46 标题: 向邮箱自动发送邮件的VBS为何出错?
在网上找一向邮箱自动发送邮件的代码,运行时提示错,请各位朋友看一下,我填写的内容对吗?该代码是否正确?- #automail.vbs
-
- NameSpace = "http://schemas.microsoft.com/cdo/configuration/"
- Set Email = CreateObject("CDO.Message")
- Email.From = "88888@qq.com"
- Email.To = "99999@qq.com"
- Email.Subject = "Test sendmail.vbs"
- Email.Textbody = "OK!"
- Email.AddAttachment "d:\012.txt"
- With Email.Configuration.Fields
- .Item(NameSpace&"sendusing") = 2
- .Item(NameSpace&"smtpserver") = "smtp.sina.com"
- .Item(NameSpace&"smtpserverport") = 25
- .Item(NameSpace&"smtpauthenticate") = 1
- .Item(NameSpace&"sendusername") = "88888"
- .Item(NameSpace&"sendpassword") = "123"
- .Update
- End With
- Email.Send
复制代码
作者: weichenxiehou 时间: 2013-7-28 10:04
vbs的注释是用'开头,所以把第一行改为'automail.vbs
作者: dnvplj 时间: 2013-7-28 10:15
修改后,提示出错
作者: LJY4.0 时间: 2022-6-5 21:08
本帖最后由 LJY4.0 于 2022-6-5 21:10 编辑
应该先把错误提示发出来,不然无法得知错误
欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |