标题: vbs 判断当前用户是否拥有管理员权限 [打印本页]
作者: plp626 时间: 2008-3-13 01:01 标题: vbs 判断当前用户是否拥有管理员权限
这个是bat版的,(from faltslz)
fsutil >nul 2>nul
if %errorlevel%==9009 echo 该版Windows没有fsutil程序
if %errorlevel%==0 echo 是管理员身份
if %errorlevel%==1 echo 非管理员身份
可我知道一些网吧,或者版本低的系统(那些系统提供了这个组建?),确实没有装fsutil,那么就会出现误判,if %errorlevel%==9009 echo 该版Windows没有fsutil程序
if %errorlevel%==0 echo 是管理员身份
if %errorlevel%==1 echo 非管理员身份
请问用vbs怎么来判断呢?
若觉得vbs没有这个函数功能,哪可以其他方法?
谢谢!
[ Last edited by plp626 on 2008-3-13 at 01:03 AM ]
作者: fastslz 时间: 2008-3-13 12:04
我是单用户登入的所以对这些不太了解,
http://www.microsoft.com/china/technet/community/scriptcenter/user/default.mspx
看看这个有用吗
@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
原贴http://www.cn-dos.net/forum/viewthread.php?tid=37787&fpage=1set 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
作者: baomaboy 时间: 2008-3-13 12:46 标题: 参考-枚举管理员
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
strComputer = objNetwork.ComputerName
Set objGroup = GetObject("WinNT://" & strComputer &"/Administrators,group")
For Each objUser in objGroup.Members
Wscript.Echo "管理员:"&objUser.Name
Next
作者: jewel 时间: 2008-3-13 14:27
刚有用谢谢了。。