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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 sxP1.= W  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 4Go$OQ`  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 -za+Wa`vH  
g-4m
.;  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 5.IX  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 lR
<1
x  
r bfIH":  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. ?o>JX.Nl&7  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 fRt`]o:Om  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO |H .  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 Y&![2o.Q  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： c[E"  
cZb5h 9  
*wfb~&:}  
以下是代码片段： [iO*t,3@h  
<%@ Language=Vbscript%> N=vb*3ECg  
<% 5s7C;+  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") X2[d15!9  
%> s7789pR  
$2
kZM4  
(#)-IdXXO<  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 |/YwMBi  
启后看效果。) ='[J.  
这时候我们看看还是用原来的调用方法的结果： fPpFAO  
K/;*.u`:  
以下是代码片段： eI^Q!b8n  
<%@ Language=Vbscript%> EqYBT  
<% FD1Z}v!5IJ  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") 3}F{a8iIm  
%> 5McOSy  
;_nV*G.y#^  
; *ZiH%q,  
=>0G
 
这时候的运行结果为： <@](uWu  
服务器对象 错误 'ASP 0177 : 800401f3' ,q".d =6  
N E/_  
Server.CreateObject 失败 _!K@(dl  
ir?Y>  
/aspimage/testfile2.asp, 行3 S9;:)  
e.>>al  
800401f3 +
lNAog  
(OK，达到我们的要求) d1{%z\u a  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 TIIwq H+h.  
果就产生了第三种方法。 4k]DktY}.  
9*ek5vPB  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 o-ee3j.  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 D|gI3i  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM /ygC_,mx  
L的标注，以便在网页中加入一个组件。方法是： *[ww;  
]nQC  
以下是代码片段： qrLE1b 1$  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj O={ ?c1i:  
ect"></object> M~O$,dof  
@&F\M}  
},& =r= B  
 TNj WZ  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl qJZ
:\u8oO  
ication或page(表示当前页面，也可缺省) C%ZSsp u  
这种写法对我们没用，还有一种写法是: fnJ!~b*qo  
&f"kWOe$X  
以下是代码片段： OGGuVY  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj CW . O"_  
ect> hAvX{]  
k0>]7t$L  
wQR0R~|M  
^;DbIo\6H  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO bmd3fJb`r  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 WvVf+|Km  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 E!6Nf[  
写法为： K."h}f
95  
'"4S3Fysm  
以下是代码片段： -6yFE- X/  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 :h!&.FB  
CF-8940-00A0C9054229"></object> s4kkzTnXE3  
us2RW<Oxv  
:WM[[LOaC  
看运行结果，没问题，OK。这时候我们再用 R;3Tyn+  
.0
ExHcr  
以下是代码片段： =(\xe| Q  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 /q\{OsrX  
CF-8940-00A0C9054228"></object> %7n(>em  
{T(z@0Xu  
BSc5@;  
t9Y?0O}/  
这时候就出错了。 jv5Os-  
I7@g,~s  
新建一用户：iusr_domain &LM ^,xx}  
IIS里设置对应站点的匿名用户IUSR_DOMAIN d2=Z=udd  
CACLS： 设置目录权限 dZi?Z  
fd&=\~1_$  
这样FSO可用，但不会影响别人