|
|
re:如果你只是想导出用户的个人信息等数据,而...
如果你只是想导出用户的个人信息等数据,而不包括密码。<br>
<br>
那通过编译个脚本就OK了:<br>
<br>
使用VBScript导出Marketing组织单元中的所有对象 <br>
<br>
在本例中,您将使用诸如Notepad的文本编辑器创建一个VBScript程序。该脚本搜索Marketing组织单元并创建一个文本文件,该文件列出了所有用户对象和这些对象的某些属性。 <br>
<br>
创建导出脚本 <br>
<br>
<br>
将以下文本复制到文本编辑器中: <br>
'Global variables <br>
Dim oContainer <br>
Dim OutPutFile <br>
Dim FileSystem <br>
<br>
'Initialize global variables <br>
Set FileSystem = WScript.CreateObject("Scripting.FileSystemObject") <br>
Set OutPutFile = FileSystem.CreateTextFile("marketing.txt", True) <br>
SetoContainer=GetObject("LDAP://OU=marketing,DC=reskit,DC=com") <br>
<br>
'Enumerate Container <br>
EnumerateUsers oContainer <br>
<br>
'Clean up <br>
OutPutFile.Close <br>
Set FileSystem = Nothing <br>
Set oContainer = Nothing <br>
<br>
WScript.Echo "Finished" <br>
WScript.Quit(0) <br>
Sub EnumerateUsers(oCont) <br>
Dim oUser <br>
For Each oUser In oCont <br>
Select Case LCase(oUser.Class) <br>
Case "user" <br>
<br>
If Not IsEmpty(oUser.distinguishedName) Then <br>
OutPutFile.WriteLine "dn: " & oUser.distinguishedName <br>
End If <br>
<br>
If Not IsEmpty(oUser.name) Then <br>
OutPutFile.WriteLine "name: " & oUser.Get ("name") <br>
End If <br>
'need to do this because oUser.name would get back the Relative Distinguished name (i.e. CN=Jo Brown) <br>
<br>
If Not IsEmpty(oUser.st) Then <br>
OutPutFile.WriteLine "st: " & oUser.st <br>
End If <br>
<br>
If Not IsEmpty(oUser.streetAddress) Then <br>
OutPutFile.WriteLine "streetAddress: " & oUser.streetAddress <br>
End If <br>
<br>
Case "organizationalunit" , "container" <br>
<br>
EnumerateUsers oUser <br>
End Select <br>
OutPutFile.WriteLine <br>
Next <br>
End Sub <br>
<br>
将该文件保存为Export.vbs <br>
在命令提示符状态下输入export.vbs并按下回车键。系统将创建一个名为Marketing.txt的文件,该文件包含用户列表和这些用户的一些属性,如特异名字、名字、州名及街道地址等。<br>
<br>
<br>
<br>
详细的说明:<a target=_blank href=http://www.microsoft.com/china/windows2000/library/planning/activedirectory/bulksteps.asp>http://www.microsoft.com/china/windows2000/library/planning/activedirectory/bulksteps.asp</a>#heading2<br>
<br>
<br>
<br>
<br>
如果需要用户名以及密码,可能就需要ADMT工具了,这个工具在微软网站有。详细的说明请看帮助。<br>
|
|