描述
在 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,如需转载请自行联系原作者