将Domain User 加入管理员组

350阅读 0评论2015-09-08 ytmin
分类:WINDOWS

保存为VBS脚本

Option Explicit
Dim WshNetwork
Dim LocalGroup
Dim LocalComputer
Set WshNetwork = WScript.CreateObject("WScript.Network")
LocalComputer = WshNetwork.ComputerName
Set LocalGroup = GetObject("WinNT://" + LocalComputer + "/Administrators,Group")
If LocalGroup.IsMember("WinNT://acer-twp/Domain Users") Then
WScript.Quit
Else
LocalGroup.Add "WinNT://acer-twp/Domain Users"
End If


上一篇:未来在哪里平凡---写在生日的前一天
下一篇:使用Powershell 脚本建立AD用户