描述
在 DNS 服务器上创建名为 accounting.fabrikam.com 的主要 DNS 区域。
有关在这段代码中使用的 CreateZone 方法的更多信息，请单击 此处。

支持平台
Windows Server 2003
是
Windows XP
否（然而，可以在 Windows XP 计算机上对远程 DNS 服务器运行脚本）
Windows 2000
是，需要安装 DNS WMI 提供程序
Windows NT 4.0
否

脚本代码
strZoneName = "accounting.fabrikam.com"
intPrimaryZone = 1
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\MicrosoftDNS")
Set objItem = objWMIService.Get("MicrosoftDNS_Zone")
errResult = objItem.CreateZone(strZoneName, intPrimaryZone)



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