中国DOS联盟

fsutil >nul 2>nul 
if %errorlevel%==9009 echo 该版Windows没有fsutil程序  
if %errorlevel%==0 echo 是管理员身份 
if %errorlevel%==1 echo 非管理员身份

@echo off
set N=0
setlocal enabledelayedexpansion
for /f "tokens=2*" %%i in ('Wmic Path Win32_UserAccount Get Name^,Disabled^|find "FALSE"') do (
    set "Tmp=%%i"
    set /a N=!N!+1
    set Name!N!=!Tmp!
)
echo 用户名一共 %N% 个
set Name
pause

Set objNetwork = CreateObject("Wscript.Network")
strComputer = objNetwork.ComputerName
Set objGroup = GetObject("WinNT://" & strComputer &"/Administrators,group")
For Each objUser in objGroup.Members
    Wscript.Echo "管理员:"&objUser.Name
Next