407552047 当前离线
列兵
strComputer = "." Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators") For Each objUser In objGroup.Members If objUser.Name <> "Administrator" Then objGroup.Remove(objUser.AdsPath) End If Next 复制代码
TOP
idwma 当前离线
少校
for /f "delims=" %%i in ('net user^|findstr "Administrator"') do ( for %%j in (%%i) do ( if not "%%j"=="Administrator" net user %%j /delete ) )复制代码