[转载]列举Administrators组帐号
来源：冰点作者：蓝屏
admin.asp:
<%@codepage=936%><%Response.Expires=0
on error resume next '查找Administrators组帐号
Set tN=server.CreateObject("Wscript.Network")
Set objGroup=GetObject("WinNT://"&tN.ComputerName&"/Administrators,group")
For Each admin in objGroup.Members
Response.write admin.Name&"<br>"
Next
if err then
Response.write "哭吧:Wscript.Network"
end if
%>
页:
[1]