将登录用户加入本地管理员组！

如下脚本是将登录用户加入本地管理员组，保存为VBS脚本。作为计算机启动脚本！

strComputer = "."
Dim LocalGroup
Dim LocalComputer
Set WshNetwork = WScript.CreateObject("WScript.Network")
LocalComputer = WshNetwork.ComputerName
Set LocalGroup = GetObject("WinNT://" + LocalComputer + "/Administrators,Group")
Set objNet = CreateObject("Wscript.Network")
strDomain = objnet.UserDomain
strUser = objnet.UserName
Set objAdmins = GetObject("WinNT://" & strComputer & "/Administrators")
Set objGroup = GetObject("WinNT://" & strDomain & "/" & strUser &"")
If LocalGroup.IsMember("WinNT://" & strDomain & "/" & strUser &"") Then
WScript.Quit
Else
objAdmins.Add(objGroup.ADsPath)
End If