自动发送邮件报错
我在收件人中调用一个变量 receiver ,但是总是提示如下错误,请大侠指导下,谢谢!Microsoft VBScript 编译器错误 错误 '800a0409'
未结束的字符串常量
/sendmail.asp,行 107
objEmail.To = "<%=receiver
-------------------------^
代码如下:
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "****@****.com" '发件人
objEmail.To = "<%= receiver %>" '收件人
objEmail.Subject = "电脑维护满意度评价" '主题
objEmail.Textbody = "IP: 192.168.18.86" '内容
'objEmail.AddAttachment "d:\record\spivr.ini" '附件
objEmail.Configuration.Fields.Item _
("http://schemas.) = 2
objEmail.Configuration.Fields.Item _
("http://schemas.) = _
"smtp.***.com"
objEmail.Configuration.Fields.Item _
("http://schemas.) = "****@***.com" '用户名
objEmail.Configuration.Fields.Item _
("http://schemas.) = "****" '密码
objEmail.Configuration.Fields.Item _
("http://schemas.) = 1 '明文验证
objEmail.Configuration.Fields.Item _
("http://schemas.) = 25
objEmail.Configuration.Fields.Update
objEmail.Send
[ 本帖最后由 cjsforing 于 2011-9-21 10:18 编辑 ]