一个AD域环境，许多用户将Domain Admins组从本地Administrators组中删除了，导致域管理员进行管理时诸多麻烦。希望用一个脚本在计算机开机时能够自动将Domain Admins组加入本地Administrators组中。
这个脚本稍作修改可以将任意的域用户或组加入到本地组中。脚本如下：
'────────────────────────────
'脚本功能：
'将域管理员组加入计算机的本地管理员组
'主要用于修复域管理员组被手动从本地管理员组中删除的问题
'该脚本需要在已经加入域环境的计算机上运行
'本脚本稍作修改可以将任何用户或组加入到任何组中
' 2006-12-08
'────────────────────────────
Set WshNetwork = WScript.CreateObject("WScript.Network")
'获得当前计算机的名称
strComputer = WshNetwork.ComputerName
'获得当前域的NetBIOS名称
strDomain = WshNetwork.UserDomain
'设置当前计算机的本地administrators组和域Domain Admins组
'如果需要将其他用户加入其他本地组，可以更改组名或用户名
Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators")
Set objUser = GetObject("WinNT://" & strDomain & "/Domain Admins")
'判断本地administrators组成员，如果Domain Admins已经是成员，便退出执行
For Each objListUser in objGroup.Members
If objListUser.name ="Domain Admins" Then
Wscript.Quit
End If
Next
'否则就将Domain Admins加入本地管理员组
objGroup.Add(objUser.ADsPath)