三种禁用FileSystemObject(FSO)组件的方法

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 67Ai.3dR  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 oSt-w{!  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 v.+-)RLQg  
:<s)QD  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 cT8jG,+"}  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 ;""V s6  
W:P4XwR{  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. Jjz:-Uqq2  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 aU2O5z&  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO +GWeu0b(~  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 A1p;Ye
>o~  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： pd,5.d  
E'e#axF;  
C}+w<  
以下是代码片段： jd=k[Yqr  
<%@ Language=Vbscript%> u(?  
<%
i 4eb\j  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") Tc@r#!.m  
%> 0?ZJJdI3  
Fy<dk}@  
QdG_zK>|e  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 5 %q26&  
启后看效果。) }@}jwi)l  
这时候我们看看还是用原来的调用方法的结果： OGrVy=rd  
y&A*/J4P  
以下是代码片段： G6Z2[Ej1  
<%@ Language=Vbscript%> u%#bu^4"  
<% [X=-x=S,  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") <O>r e3s  
%> X#-U  
5FnWlFc  
Xf9<kbRw/  
zO2Z\E'%.  
这时候的运行结果为： &?/h#oF@\  
服务器对象 错误 'ASP 0177 : 800401f3' |Z$heYP:w  
p}!rPd*  
Server.CreateObject 失败 $)mE"4FE  
CfoSow-  
/aspimage/testfile2.asp, 行3 veAGUE %3  
N|T%cdh:/  
800401f3 myFjw@  
(OK，达到我们的要求) #5N#^#r"  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 ZyT9y  
果就产生了第三种方法。 ' V;cA$ $  
q/?#+d  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 a84^"GH7  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 qn6Y(@<[  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM GrW+P[j9  
L的标注，以便在网页中加入一个组件。方法是： !9k)hP  
 s6rdQI]  
以下是代码片段： r@H<@Vuc  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj EMmNlj6  
ect"></object> Lcf =)GL  
t%n1TY,  
*;(
LKRV  

,-&ler~[  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl UW<V(6P  
ication或page(表示当前页面，也可缺省) _LFZ0  
这种写法对我们没用，还有一种写法是: 0~H(GG$VH  
#q%xJ[  
以下是代码片段： &p^S6h  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj s9PD[u/y  
ect> @U_w:Q<9u  
ce/Rzid  
f[HhLAVGK`  
*{P"u(K  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO mZDrvTI'  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 >o>r@;  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 l!<Nw8+U  
写法为： l&(,$RmYp  
K~5QL/=1  
以下是代码片段： >lU[ lf+/  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 
cj`g)cX|  
CF-8940-00A0C9054229"></object> `$j
c=ZLm  
!iWPldn&]  
su
N{)"  
看运行结果，没问题，OK。这时候我们再用 '`#2'MXG  
AKC';J  
以下是代码片段： q%w\UAqA  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 S "R]i  
CF-8940-00A0C9054228"></object> DKAqQ?fS  
r ioNP(  
z*.
4Y  
iv2did4  
这时候就出错了。 wbshKkUh_*  
$(H%|Oyn  
新建一用户：iusr_domain ZMy0iQ@  
IIS里设置对应站点的匿名用户IUSR_DOMAIN ZWQrG'$?o8  
CACLS： 设置目录权限 ^]3Y11sI  
o"->RC  
这样FSO可用，但不会影响别人