将用户添加到本地管理员组的脚本
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://domain name/domain admins") Then
WScript.Quit
Else
LocalGroup.Add "WinNT://domain name/domain admins"
End If
|
zhangzzs
博客统计信息
热门文章
最新评论
友情链接