Question

我有一个相当奇怪的问题（不是我们都...）而下面的（去公司化）Sub（）在我们旧的Windows 2003服务器上工作正常，但拒绝在Windows 2008 R2上工作：

旧操作系统：Windows Server 2003 64位

旧的Eniv。：IIS 6.0 w /虚拟SMTP服务器配置为通过企业SMTP中继中继邮件。

sub SendMail()
on error resume next

  'Send Mail vars
  Dim ObjSendMail
  Dim iConf
  Dim Flds

  Set ObjSendMail = CreateObject("CDO.Message")
  Set iConf = CreateObject("CDO.Configuration")
  Set Flds = iConf.Fields

  Set ObjSendMail.Configuration = iConf
    ObjSendMail.To = "dba1@blah.com;dba2@blah.com;dba3@blah.com"
    ObjSendMail.Subject = "Daily Primary Load Has Completed"
    ObjSendMail.From = "app-server@blah.com"

  ObjSendMail.Send
  Set ObjSendMail = Nothing
end Sub

新操作系统：Windows Server 2008 R2 64位

新的Eniv ：IIS 7.5 w / IIS 6.0 Manager＆amp;兼容性w /虚拟SMTP服务器配置为通过企业SMTP中继中继邮件（配置相同的设置到旧服务器）。

每当我尝试在新机器上运行上面的确切脚本时，我都会收到以下非常有用的错误消息：

C:\Users\digitalnoise\email_test.vbs(21, 4) CDO.Message.1: The "SendUsing" configuration value is invalid.

我没有开发这个系统或者这些脚本，而那些已经完成的系统早已不复存在，而且我不得不去维护。不幸的是我从来没有使用VBScripting来自动化（我已经使用了其他项目，但我的观点正在改变），所以我只是不熟悉这个或如何弄清楚为什么我的配置不起作用。

我已经在这几周了，而且我提出的大多数结果都不起作用（MS的远程SMTP架构 - 服务器无法访问互联网），或者似乎适用特别是ASP.Net页面中的VBScript - 这些脚本不是。

我做过的事情：

停止＆amp;配置虚拟服务器后重新启动SMTP服务
停止＆amp;配置后重新启动虚拟SMTP服务器。
停止＆amp;重新启动IIS

有人有什么想法吗？

VBScript：本地SMTP的CDO在Win2k3上运行，而不在Win2k8 R2上运行

0 个答案: