最近在我们的邮件服务器中添加了 smtp 身份验证,发现了一个非常有趣的事情。在 to cdomessage.to 字段中使用变量时,它将返回错误“8004020f”。但是,如果我对电子邮件地址进行硬编码,它就可以正常工作。这是我的代码:
varEmail = "someoneelse@somesite.com"
set cdoMessage = CreateObject("CDO.Message")
set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = 2
.Item(cdoSMTPServer) = "localhost"
.Item(cdoSMTPServerPort) = 25
.Item(cdoSMTPconnectiontimeout) = 10
.Update
end With
CdoMessage.Configuration = cdoConfig
cdoMessage.Subject="NEW EMAIL"
cdoMessage.From="someone@somesite.com"
cdoMessage.To=varEmail
cdoMessage.TextBody="HELLO WORLD!"
cdoMessage.Send
set cdoMessage=nothing
set cdoConfig=nothing
我该如何解决这个问题,以便我可以在 cdoMessage.To 字段中使用一个变量