通过本脚本可直接把AD域帐号的信息及状态直接自动生成csv文件，可显示字段有：“姓名，AD帐号，描述信息，邮件，邮编，传真，密码输错次数，登录次数，禁用状态，锁定状态，最后修改时间，66048密码不过期状态，对象位置”，对域帐号管理提供便利。 脚本内容： '------------------------------------------------ ' UserInfoReport.vbs ' 域帐号用户信息报表生成VBScript脚本操作 ' Sample VBScript to user information ' ----------------------------------------------- '列出AD帐号信息，并生成AD用户信息csv报表 Dim objRootDSE,objContainer Dim objOutPutFile,objFileSystem Dim strContainer,strDNSDomain '获取本机所加入的Active Directory域信息 Set objRootDSE = GetObject("LDAP://RootDSE") strDNSDomain = objRootDSE.Get("DefaultNamingContext") ……