标题:更改 DNS 区域类型 出处:gOxiA=苏繁=SuFan Blog 时间:Thu, 30 Mar 2006 18:53:05 +0000 作者:gOxiA 地址:https://sufan.maytide.net/read.php/839.htm 内容: 本文摘自:http://www.microsoft.com/china/technet/community/scriptcenter/network/scrnet139.mspx 描述 将区域 accounting.fabrikam.com 的 DNS 区域类型更改为主 DNS 区域。 有关在这段代码中使用的 ChangeZoneType 方法的更多信息,请单击此处。 支持平台 Windows Server 2003 是 Windows XP 否(然而,可以在 Windows XP 计算机上对远程 DNS 服务器运行脚本) Windows 2000 是,需要安装 DNS WMI 提供程序 Windows NT 4.0 否 脚本代码 intPrimaryZone = 1 strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\MicrosoftDNS") Set colItems = objWMIService.ExecQuery _ ("Select * from MicrosoftDNS_Zone Where Name = 'accounting.fabrikam.com'") For Each objItem in colItems errResult = objItem.ChangeZoneType(intPrimaryZone, true) Next Generated by Bo-blog 2.1.1 Release