支持平台
Windows XP
Windows Server 2003
Windows 2000
Windows NT 4.0
Windows 98
脚本代码

strComputer = "MyComputer"
Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators,group")
Set objUser = GetObject("WinNT://" & strComputer & "/kenmyer,user")
objGroup.Add(objUser.ADsPath) 本文转自 苏繁 51CTO博客,原文链接:http://blog.51cto.com/goxia/221154,如需转载请自行联系原作者