ADP20050312:测试环境、准备工作Adp20050312：准备活动
在介绍今天的知识之前，希望大家对active directory 有一定的了解。最好你是windows网络的网管，最低限度你应该像我一样在自己的XP系统上虚拟了一台windows 2000 server family域控制器。我的机器CPU：intel P4 1.7GHz ，内存：256+128=384M , 硬盘 迈拓60G（可惜这60G已经被我塞的满满，为了装这个虚拟系统我来回腾空间，终于将我一个3.5G的分区完全空出来了）。我使用VMware Workstation Version：4.0.5 。安装完系统并慷慨的分给他128M的内存，建立一个活动目录，使其成为域控制器。机器名为arserver ，域名cam，建立了arden、xb两个用户，并和同事的测试域cad互相建立信任关系。这些都不麻烦，一前没做过找个mcse之类的书可以建立一个比我好的多的域结构。
脚本大家都用过吧，没用过没关系，把下面的代码敲入记事本另存为ADSIEnumTop.vbs文件，直接双击或者在命令行中敲下面命令：> cscript ADSIEnumTop.vbs
‘file name :ADSIEnumTop.vbs
' Connect to the Active Directory root object
Set adsRootDSE = GetObject("LDAP://RootDSE")
' Form a path to the top-level container of the default domain
strPath = "LDAP://" & adsRootDSE.get("defaultNamingContext")
' Display path being used
WScript.echo "Listing objects at " & strPath
' Connect to the container specified
Set adsDomain = GetObject(strPath)
' Enumerate through each object in the container
For Each adsObject In adsDomain ' Display the name of each object and its class
WScript.Echo adsObject.Name & " (" & adsObject.Class & ")"
Next
在我刚才配置好的虚拟系统中它运行的结果如下：
当然建议你安装VC或BCC编译器。
Ok配置好这样一个环境，我们可以在后面使用它进行测试了。
如果你有安装虚拟系统和配置域的问题，可以留言，我们来讨论。
