

判断登陆的域帐号是否在本地管理员组
以下代码为检查登陆帐号是否拥有本机管理员组的权限' ]. S% ?$ [( @
5 g7 _4 i t' Y0 f' q' O6 @1 L. U) GSet objNetwork = CreateObject("Wscript.Network")3 K; v7 l, P, A
strComputer = objNetwork.ComputerName
7 T' ?0 b q ?strUser = objNetwork.UserName
) z8 \! k( X1 s8 L5 wSet objGroup = GetObject("WinNT://" & strComputer & "/Administrators")
; h& s5 O8 T& M" N+ ^% a; j) mFor Each objUser in objGroup.Members0 e/ ?2 I! Y1 f9 p: Y- t
If objUser.Name = strUser Then
; T# c, b o* i( C. N Wscript.Echo strUser & " is a local administrator."
" k4 {1 O* Z$ T2 @% u End If$ R$ e# s& J: [5 {
Next
+ i5 E6 `% C# u1 x' iwscript.echo "Done!", p6 z& Y( p* @
3 y7 \% E, n% h: N& E5 @( p# G; d使用时复制到记事本后并将后缀名更改为vbs即可