0

我正在尝试使用 cdosys.dll (ProgId "CDO.Message") 发送电子邮件。代码看起来像这样：

http://www.w3schools.com/asp/asp_send_email.asp

Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.AddAttachment "c:\mydocuments\test.txt"
myMail.Send
set myMail=nothing

在一台 PC 上，它可以工作。另一方面，它没有。我收到错误“‘SendUsing’配置无效”。要修复它，我应该能够添加如下代码：

myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2

myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.server.com"

myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25
myMail.Configuration.Fields.Update

问题：CDO 配置到底存储在哪里？我搜索了注册表，搜索了 MSDN 和谷歌……但我空手而归。

有任何想法吗？

提前谢谢！

4

0 回答 0