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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页
lV3x*4O=  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 Wq D4YGN  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 \g`\`e53?  
d=$Mim  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 Z!a=dnwHz  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 `!3SF|x&  
Zgp4`)}:  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. Tt`u:ZwhF  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 #'nr Er <  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO ;LKkbT 5  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改  L^/5ux  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： e9Wa<i8  
hE'-is@7  
4$HhP,gL=  
以下是代码片段： <Uk}o8E  
<%@ Language=Vbscript%> oz\!V*CtK  
<% K-^\" W8  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") q5J5>  
%> Gt8M&S-;  
xjUT{iwS  
g{]0sn#  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 8rAg\H3E  
启后看效果。) WH#1zv  
这时候我们看看还是用原来的调用方法的结果： > ym,{EHK  
rQ{7j!Im  
以下是代码片段： )` SrfGp8  
<%@ Language=Vbscript%> Hp|kQJ[LE  
<% b"<liGh"n-  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") #X+JHl  
%> W@M:a  
5 Aw"B  
;RZ )  
Di,^%  
这时候的运行结果为： P8OaoPj  
服务器对象 错误 'ASP 0177 : 800401f3' :_`F{rDB  
KC*e/J  
Server.CreateObject 失败 y;m|  
"=HA Y  
/aspimage/testfile2.asp, 行3 B{n,t}
z  
ANAVn@
[  
800401f3 9d0@wq.  
(OK，达到我们的要求) =g7x' kN  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 nSDMOyj+  
果就产生了第三种方法。 o)M}!MT  
)J o:pkM  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是
F>SRs=_  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 Co9^OF-k  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM ;>%r9pz
~  
L的标注，以便在网页中加入一个组件。方法是： rK8lBy:<  
XW2b|%T  
以下是代码片段： 
ol\Utq,  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj %Bj\W'V&p  
ect"></object> "@^k)d$  
np|Sy;:  
M><yGaaX/  
`$Y.Y5mGtJ  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl &~cBNw|  
ication或page(表示当前页面，也可缺省) WMDl=6  
这种写法对我们没用，还有一种写法是: gi3F` m  
rET\n(AJ  
以下是代码片段： x;O[c3I  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj <q58uuK  
ect> ^`i#$  
^x]r`b  
(q/e1L-S  
dohA0  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO #
H&|*lr  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 xJpA0_xfG  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 ;DQ ZT  
写法为：  \{_q.;}  
RT4x\&q  
以下是代码片段： q_:4w$>  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 V5@:#BIs  
CF-8940-00A0C9054229"></object> `GBW%X/  
\k7"=yx  
-u+vJ6EY  
看运行结果，没问题，OK。这时候我们再用 tH@Erh|%  
)EPjAv  
以下是代码片段： q~F|  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 5;Czu(iH$  
CF-8940-00A0C9054228"></object> nQZx=JK  
+%z>H"J.  
tn\yI!a  
6D;Sgc5"  
这时候就出错了。 R`5.[?Dt  
zy?|ODM  
新建一用户：iusr_domain V;VHv=9`o  
IIS里设置对应站点的匿名用户IUSR_DOMAIN f].h^~.q  
CACLS： 设置目录权限 LtF,kAIt7v  
_gR;=~S  
这样FSO可用，但不会影响别人