Hi !
i've setup a new server that should be working as secondary for 2 other
servers.... so it's very terrible to write eache zone my self to be add to
as secondary forward or reverse zone from the original ones.
so i need to know where to find a script that list all the zones (primary)
from a spesific dns & another script to automatically add them as secondary
in my new one.
thanks for

A.Sabry

i got this code from technet:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" &
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\MicrosoftDNS")
Set colItems = objWMIService.ExecQuery("Select * from rippleegypt.com")
For Each objItem in colItems
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Zone Type: " & objItem.ZoneType
Wscript.Echo "Aging: " & objItem.Aging
Wscript.Echo "Allow Update: " & objItem.AllowUpdate
Wscript.Echo "Autocreated: " & objItem.AutoCreated
Wscript.Echo "Available For Scavenge Time: " & _
objItem.AvailForScavengeTime
Wscript.Echo "Container Name: " & objItem.ContainerName
Wscript.Echo "Data File: " & objItem.DataFile
Wscript.Echo "Disable WINS Record Replication: " & _
objItem.DisableWINSRecordReplication
Wscript.Echo "DNS Server Name: " & objItem.DnsServerName
Wscript.Echo "Directory Service-Integrated: " & objItem.DsIntegrated
Wscript.Echo "Forwarder Slave: " & objItem.ForwarderSlave
Wscript.Echo "Forwarder Timeout: " & objItem.ForwarderTimeout
Wscript.Echo "Last Successful SOA Check: " & _
objItem.LastSuccessfulSoaCheck
Wscript.Echo "LastSuccessful Xfr: " & objItem.LastSuccessfulXfr
Wscript.Echo "Local Master Servers: " & objItem.LocalMasterServers
Wscript.Echo "Master Servers: " & objItem.MasterServers
Wscript.Echo "No-Refresh Interval: " & objItem.NoRefreshInterval
Wscript.Echo "Notify: " & objItem.Notify
Wscript.Echo "Notify Servers: " & objItem.NotifyServers
Wscript.Echo "Paused: " & objItem.Paused
Wscript.Echo "Refresh Interval: " & objItem.RefreshInterval
Wscript.Echo "Reverse: " & objItem.Reverse
Wscript.Echo "Scavenge Servers: " & objItem.ScavengeServers
Wscript.Echo "Secondary Servers: " & objItem.SecondaryServers
Wscript.Echo "Secure Secondaries: " & objItem.SecureSecondaries
Wscript.Echo "Shutdown: " & objItem.Shutdown
Wscript.Echo "Use Wins: " & objItem.UseWins
Wscript.Echo
Next
"Ahmad" <askme> wrote in message
news:%23hq1mQNJHHA.1008@TK2MSFTNGP06.phx.gbl...
> Hi !
> i've setup a new server that should be working as secondary for 2 other
> servers.... so it's very terrible to write eache zone my self to be add to
> as secondary forward or reverse zone from the original ones.
> so i need to know where to find a script that list all the zones (primary)
> from a spesific dns & another script to automatically add them as
> secondary in my new one.
> thanks for
>
> A.Sabry
>