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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 ?#da4W  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 LB1LQ0M  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 Wxx?iW ,  
{26/SY  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 j#hFx+S  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 gMS-mkZ  
3 -Nwg9U  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. Gm~jC <  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 E
rnjIx:  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO ;EDc1:  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 ~.;+uH<i  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： YMb\v4  
>)\x\e  
m^I+>Bp/:  
以下是代码片段： F%M4i`Vh  
<%@ Language=Vbscript%> ji9 (!G  
<% 9%T~^V%T7  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") }coSMTMv6  
%> ra2sYH1wr  
l+`f\},  
X:PB }  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 Y">m g=B  
启后看效果。) 1j"_@?H[  
这时候我们看看还是用原来的调用方法的结果： &3~lZa;D  
CobMagPhr  
以下是代码片段： cAnL,?_v  
<%@ Language=Vbscript%> Q$u&/g3NvL  
<% mCah{~  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") O|wu;1pQ  
%> )IQ5Qu  
bS7rG$n [  
S5'ZKk  
^C$Oht,cU  
这时候的运行结果为： }81eef4$S  
服务器对象 错误 'ASP 0177 : 800401f3' wiHGTaR  
>v--R8I*  
Server.CreateObject 失败 A8tzIh8  
;r<(n3"F  
/aspimage/testfile2.asp, 行3 Zcst$Aro  
 =ie8{j2:  
800401f3 Lxz!>JO>  
(OK，达到我们的要求) c$fi3O  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 su:~Xd  
果就产生了第三种方法。 WRIOjQ:  
]$Ud`<Xnx  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 yR}PC/>  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 Y%$@ZYW  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM GY%^!r  
L的标注，以便在网页中加入一个组件。方法是： v|~&I%S7  
[&H$Su}$0  
以下是代码片段： ^hL?.xj  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj F3uR:)4<M  
ect"></object> Fs+ CY  
uT1xvXfqP  
/1D]\k()  
)\K;Ncp[  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl Tx)!qpZ  
ication或page(表示当前页面，也可缺省) QEtf-xNn^  
这种写法对我们没用，还有一种写法是: \<n 9kwU  
d}B_ wz'  
以下是代码片段： B"; >
zF  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj '?$N.lj$d  
ect> /w[B,_ZKTk  
"&9L  
xbUL./uj  
5l_ >QB  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO 4S9hz  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 0 $Ygt0d  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 Q5K<ECoPk  
写法为： /xS4>@hn  
MZPX
I{G  
以下是代码片段： ?so=k&I-M  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 l rRRRR  
CF-8940-00A0C9054229"></object> xvpCOoGsz  
PeU>h2t  
%5[,U)X"  
看运行结果，没问题，OK。这时候我们再用 *;N6S~_'Y  
'>"
ri
Ek  
以下是代码片段： BIJlU(aF  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 3$ 'eDa[  
CF-8940-00A0C9054228"></object> <xn96|$  
8,VX%CS#q  
xJcM1>cT>  
yiT)m]E d  
这时候就出错了。 O4c[,Uq8~  
NI<;Lm  
新建一用户：iusr_domain &<Iyb}tA?  
IIS里设置对应站点的匿名用户IUSR_DOMAIN --D&a;CO}  
CACLS： 设置目录权限 A,H|c="  
_0GM!Cny  
这样FSO可用，但不会影响别人