创建邮件交换器 (MX) DNS 记录

描述

在 DNS 服务器上创建邮件交换器 (MX) DNS 记录。

支持平台

Windows Server 2003

是

Windows XP

否（然而，可以在 Windows XP 计算机上对远程 DNS

服务器运行脚本）

Windows 2000

是，需要安装 DNS WMI 提供程序

Windows NT 4.0

否

脚本代码

strDNSServer =

"atl-dc-03.fabrikam.com"

strContainer = "fabrikam.com"

strOwner =

"atl-srv-01.fabrikam.com"

intRecordClass = 1

intTTL = 600

intPreference

= 0

strMailExchanger = "mailexchanger.fabrikam.com"

strComputer =

"."

Set objWMIService = GetObject("winmgmts:\\" & strComputer &

"\root\MicrosoftDNS")

Set objItem =

objWMIService.Get("MicrosoftDNS_MXType")

errResult =

objItem.CreateInstanceFromPropertyData _

   (strDNSServer, strContainer,

strOwner, intRecordClass, intTTL, intPreference,

strMailExchanger)

本文转自 苏繁 51CTO博客，原文链接：http://blog.51cto.com/goxia/221137，如需转载请自行联系原作者