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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 Qmv8T ^+  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 }N3Ur~
X\  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 \$8p8MP<&D  
/h!iLun7I  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 w\a9A#v,  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 g3w-Le&T  
{bp~_`O  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. w`Z@|A  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达
SI l<\  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO bJ.68643  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 '$CJZ`nt  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： s9YP =)I  
'q*/P&x5  
""F'Nzy  
以下是代码片段： X@7e7  
<%@ Language=Vbscript%> 1QDAfRx  
<% (/_Z^m9  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") X?]1/6rV  
%> /a
MeKM[L`  
TCO^9RP<  
"IsDL^)A9  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 NB/ wJ3 F  
启后看效果。) A!5)$>!o  
这时候我们看看还是用原来的调用方法的结果： Z}6H529[  
b"#|0d0  
以下是代码片段： L}U fd >*  
<%@ Language=Vbscript%> e0u*\b  
<% $30lNZK1m8  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") uw&'=G6v  
%> )e:u 6]  
u
JHf6Ye  
YR/rN,  
n&uD=-  
这时候的运行结果为： ZTSNM)f  
服务器对象 错误 'ASP 0177 : 800401f3' \c$!C8z  
>/F,Z%!&q  
Server.CreateObject 失败 (/l9@0Y.t  
=C2,?6!  
/aspimage/testfile2.asp, 行3 K1Wiiw  
ijWn,bj  
800401f3 )0Lv-Gs  
(OK，达到我们的要求) lo!_;`v=U  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 fDY#&EO: %  
果就产生了第三种方法。  ^'c[HVJ  
hAp<$7  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 KGb3n;]  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 |Gh~Zup  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM H23-%+*J  
L的标注，以便在网页中加入一个组件。方法是： -^LEGKN  
KC{HX?  
以下是代码片段： ^cF_z}Zi+  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj =h2zIcj  
ect"></object> "S@%d(lg  

~nG?>  
U_c.Z{lC4  
]`Y;4XR  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl :X;'37o#q  
ication或page(表示当前页面，也可缺省) %t^-Guz  
这种写法对我们没用，还有一种写法是: $u./%JS  
]\<^rEU  
以下是代码片段： d^W
EfH  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj [
SJ*ks,]  
ect> f#UT~/~bL2  
{` Lem  
cvvba 60  
']ussFaQ  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO `PR)7}/<  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 aJ1<X8  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 n089tt=TE  
写法为： !bG%@{WT  
/>zE$)'M  
以下是代码片段： Q<V?rPAcx  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 iWZrZ5l  
CF-8940-00A0C9054229"></object> kMz^37IFMG  
C. Hr  
U_HOfix  
看运行结果，没问题，OK。这时候我们再用 Em8C +EM  
OXuBtW*,z+  
以下是代码片段： o'Byuct  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 U1t7XZ3e  
CF-8940-00A0C9054228"></object> ;|f|d?Q\  
Q9b.]W  
J]A!>|Ic  
E}d@0C:  
这时候就出错了。  cf#2Wg)  
%(,Kj ~0  
新建一用户：iusr_domain _>8ZL)NQQ  
IIS里设置对应站点的匿名用户IUSR_DOMAIN 1>1&NQ#}  
CACLS： 设置目录权限 -# [=1Y  
Fcc\hV;  
这样FSO可用，但不会影响别人