在 DNS 服务器上创建主机地址 (A) 记录。
有关在这段代码中使用的 CreateInstanceFromPropertyData 方法的更多信息,请单击 此处

支持平台
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 = "workstation5.fabrikam.com"
intRecordClass = 1
intTTL = 600
strIPAddress = "192.168.1.100"
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\MicrosoftDNS")
Set objItem = objWMIService.Get("MicrosoftDNS_AType")
errResult = objItem.CreateInstanceFromPropertyData _
   (strDNSServer, strContainer, strOwner, intRecordClass, intTTL, strIPAddress)



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