Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
Active Directory Cookbook for windows server 2003- P42:If you are familiar with the O'Reilly Cookbook format that can be seen in other popular books, such as the Perl Cookbook, Java Cookbook, and DNS and BIND Cookbook, then the layout of this book will not be anything new to you. The book is composed of 18 chapters, each containing 10-30 recipes for performing a specific Active Directory task. Within each recipe are four sections: problem, solution, discussion, and see also. | dnscmd del recordadd rallencorp.com wins01 A 19.25.52.2.25 To delete a resource record use the following command dnscmd DNSServerName recorddelete ZoneName NodeName RecordType RRData The following command deletes an A record in the rallencorp.com zone dnscmd dcl recorddelete rallencorp.com winsOl A 19.25.52.2.25 13.7.2.3 Using VBScript This code shows how to add an A record and PTR record using the DNS WMI Provider ------ SCRIPT CONFIGURATION ------ strForwardRRAdd test-xp.rallencorp.com. IN A 192.32.64.13 strReverseRRAdd 13.64.32.192.in-addr.arpa IN PTR test-xp.rallencorp.com strForwardDomain rallencorp.com strReverseDomain 192.in-addr.arpa. ------ END CONFIGURATION --------- set objDNS GetObject winMgmts root MicrosoftDNS set objRR objDNS.Get MicrosoftDNS ResourceRecord set objDNSServer objDNS.Get MicrosoftDNS Server.Name . Create the A record strNull objRR.CreateInstanceFromTextRepresentation objDNSServer.Name strForwardDomain strForwardRRAdd objOutParam set objRR2 objDNS.Get objOutParam WScript.Echo Created Record objRR2.TextRepresentation Create the PTR record strNull objRR.CreateInstanceFromTextRepresentation objDNSServer.Name strReverseDomain strReverseRRAdd objOutParam set objRR2 objDNS.Get objOutParam WScript.Echo Created Record objRR2.TextRepresentation This code shows how to delete an A and PTR record for the record I created in the previous example. strHostName test-xp.rallencorp.com. set objDNS GetObject winMgmts root MicrosoftDNS set objDNSServer objDNS.Get MicrosoftDNS Server.Name . set objRRs objDNS.ExecQuery select from MicrosoftDNS ResourceRecord where OwnerName strHostName Or RecordData strHostName if objRRs.Count 1 then 421 WScript.Echo No matches found for strHostName else for each objRR in objRRs objRR.Delete WScript.Echo Deleted objRR.TextRepresentation next end if 13.7.3 Discussion 13.7.3.1 Using a graphical user interface The DNS Management snap-in is good for creating a small number of records but if you need to add or delete more than a
