建立郵件交換器 (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，如需轉載請自行聯系原作者