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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 o@"H3 gz  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 'b%S3)}  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 kvKbl;<&#  
_%Jqyc"-  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 0p8(Q  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 u3
kZOsG  
hv8V=Z'Q  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. - wCfw
C  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达
dZ_Hj X7  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO bz,C%HFA  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 !}<Y^="  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： FL-sXg  
5ILce%#zL  
V D-,)f  
以下是代码片段： [$f  
<%@ Language=Vbscript%> Bh<)e5lP:  
<% fsb_*sh&  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") r;SA1n#  
%> d'q,:="c  
?bW|~<X~  
u6;SgPw  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 3l
QGU  
启后看效果。) $fL2w^ @  
这时候我们看看还是用原来的调用方法的结果： "/g/Lc  
fn]f$n*`  
以下是代码片段： ^GHA,cSf  
<%@ Language=Vbscript%> F^z&s]^~  
<% 9F@Q  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") !3E33
 
%> }GRZCX>  
7:<co  
tWT@%(2~0  
} U\n:@:2B  
这时候的运行结果为： a;8q7nC  
服务器对象 错误 'ASP 0177 : 800401f3' ~{/"fTif  
r< sx On  
Server.CreateObject 失败 |aIY  
,p {|f}0  
/aspimage/testfile2.asp, 行3 9/'zk
  
[AA'Ko  
800401f3 *`7cvt5]IM  
(OK，达到我们的要求) 7G zf>n  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 :VGvL"Kro  
果就产生了第三种方法。 \ ?sM  
1U^;fqvja  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 TldqF BX  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 Q!9AxM2K  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM Myvp PW  
L的标注，以便在网页中加入一个组件。方法是： U8m/L^zh  
W^v3pH-y#  
以下是代码片段： 2Sz?r d,0f  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj Bs:INvhYW  
ect"></object> f_I6g uDPz  
xJlf}LEyF  
* `1W})  
/N>f#:}  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl o-H\vtOjE  
ication或page(表示当前页面，也可缺省) INt]OPD  
这种写法对我们没用，还有一种写法是: +`'=K ;{U  
2 ,RO  
以下是代码片段： |L%}@e Vw_  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj `v) :|Q  
ect> B~xT:r  
js^+{~
 
DPqk~KCM  
RzgA;ZC'  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO .ww~'5b0  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 2<q.LQ}<  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 41dB4Td5t  
写法为： :QGgtTEV""  
vVBu/)  
以下是代码片段： ^qvN:v$1  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 u]RI,3Z  
CF-8940-00A0C9054229"></object> xL&M8:  
#k?uYg8
 
~?E.U,R  
看运行结果，没问题，OK。这时候我们再用 Q#M@!&  
Pr|BhX  
以下是代码片段： $z[FL=h)?+  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 kMd1)6%6A  
CF-8940-00A0C9054228"></object> Ww\M3Q`h  
bYt[/K,  
0[E}[{t`  
K;)(fc  
这时候就出错了。 hc#Sy:T>  
0Ez(;4]3  
新建一用户：iusr_domain +xYU$e6Z  
IIS里设置对应站点的匿名用户IUSR_DOMAIN {Qv Whf  
CACLS： 设置目录权限 pg0Sq9qCN  
*,az`U
 
这样FSO可用，但不会影响别人