' ---------------------------------------------------------------
' rdo :
'      "Windows Server 2003 i Windows 2000. Receptury"
' Wydawca : HELION
' ISBN: 83-246-0063-9
' Adres: ftp://ftp.helion.pl/przyklady/ WSW2RE.zip
' ---------------------------------------------------------------


' ------ KONFIGURACJA SKRYPTU ------
strForestRootDN = "<ForestRootDN>"  ' np. dc=helion,dc=pl
' ------ KONIEC KONFIGURACJI ---------
set objCont = GetObject("LDAP://CN=DhcpRoot,CN=NetServices,CN=Services," & _
                        "CN=Configuration," & strForestRootDN)
colDHCPServers = objCont.GetEx("dhcpServers")
for each strDHCPServer in colDHCPServers
   Wscript.Echo strDHCPServer
next
