给位脚本大师们,我有一个脚本如下:
Set wsnetwork=WScript.CreateObject("WScript.Network")
Const ADS_UF_DONT_EXPIRE_PASSWD=&H10000
Const ADS_UF_ACCOUNTDISABLE = &H2
PCName=wsnetwork.ComputerName
Set objGroup01 = GetObject("WinNT://" & PCName & "/Administrators,group")
Set objGroup02 = GetObject("WinNT://" & PCName & "/Remote Desktop Users,group")
For Each objUser in objGroup01.Members
Wscript.Echo PCName & "," & objGroup01.Name & "," & objUser.Name
Next
For Each objUser in objGroup02.Members
Wscript.Echo PCName & "," & objGroup02.Name & "," & objUser.Name
Next
此脚本用于输出本地Administrators组 和 Remote Users组的成员。
但是不足有如下:
1. 输出的成员,只显示displayname,所以不知道这些成员是域用户还是本地用户。 能否显示出,这些成员是 域用户还是本地用户。
另外能否再添加如下查询:
1. 再显示出这些成员的displayname、samaccountname、上一次登录时间、上一次更改密码的时间、是否设置密码用不过期、账户是启用还是禁用
2. 若成员是域用户,再显示其所在的OU的LDAP路径。
输出格式要求:
1. 还是使用Wscript.Echo 进程查询结果的输出。
2. 一个成员信息对应一个msgbox输出,一个msgbox中显示出: 计算机名、所在组名(Administrators组或Remote Users组)、是域用户还是本地用户、此成员的displayname、samaccountname、上一次登录时间、上一次更改密码的时间、是否设置密码用不过期、账户是启用还是禁用、若是域用户还是显示其所在的OU的LDAP路径