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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 0@E[IDmp  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 KIdlndGs  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 6Flc4L8JU  
h"KN)xi$  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 '$~9~90?Z  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 #;U_ L`q  
5AR\'||u  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. 4J2NIFZ  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 _;J
7#j~}  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO E.?|L-fy  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 CD(2A,u)/  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： "])X0z yM  
*5 FSq  
pB{Q
O4qn  
以下是代码片段： j_
SRCm~:  
<%@ Language=Vbscript%> h2+vl@X  
<% q>w@W:tZ  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") #rzq9}9tB  
%> wH[@#UP3l  
:{C#<g`  
GVZ/`^ndM  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 |_aE~_  
启后看效果。) .O'S@ %]  
这时候我们看看还是用原来的调用方法的结果： )cB00*/  
E/:<9xl  
以下是代码片段： ?gjM]Ki%:  
<%@ Language=Vbscript%> _ Onsfv  
<% aYe,5
dK>  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") pL>Q'{7s3  
%> 5<C
u-
X  
Ul OoMGg  
+L*2 6ar6  
<FmrYwt  
这时候的运行结果为： =-{+y(<"r  
服务器对象 错误 'ASP 0177 : 800401f3' W,YzD&f=uS  

V4f~#Tp  
Server.CreateObject 失败 }4L
v-9s,  
$k*E^~qT  
/aspimage/testfile2.asp, 行3 !l@IG C  
 '=@O]7o~  
800401f3 {) 4
D
1  
(OK，达到我们的要求) :{%6<j  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 O'U0Y8HN  
果就产生了第三种方法。 MuYr?1<q  
#"%oz^~\  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 `N}<lg(0#  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 e{Pgz0sOQ  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM L.lmbxn  
L的标注，以便在网页中加入一个组件。方法是： R3wK@D  
X!,P] G  
以下是代码片段： 0U ?1Yh7 m  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj }S3m wp<Y  
ect"></object> ^-PlTmT  
(w?@qs!  
^~|P[}  
_;$VH4(BI  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl 'Wl))lB  
ication或page(表示当前页面，也可缺省) &fq-U5zH  
这种写法对我们没用，还有一种写法是: Skl1%`  
'@RlKMnN  
以下是代码片段： / O6n[qj|  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj z}yntY]n  
ect> c*K-?n9YMz  
-ZH]i}$  
3zY"9KUN  
?s#DD,  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO "P.7FD  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 {w}
PV5<  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 q .nsGbl  
写法为： [3;J,P=&  
m!a<\0^  
以下是代码片段： %FLz}QW*  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 vLJ<_&6  
CF-8940-00A0C9054229"></object> ZU7e1VaZM  
UL$^zR3%d  
"lx}.  
看运行结果，没问题，OK。这时候我们再用 o\1"ux;b  
`Z>4}<~+  
以下是代码片段： :}FMauHh  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 $jo}?Y+  
CF-8940-00A0C9054228"></object> N \[Cuh8Fe  
37x2fnC  
d"uR1rTk  
CT3wd?)z`  
这时候就出错了。 .RH}/D  
x "]%q^x  
新建一用户：iusr_domain KQaw*T[Q3w  
IIS里设置对应站点的匿名用户IUSR_DOMAIN fyYT#r  
CACLS： 设置目录权限 c^}gJ  
yAG4W[  
这样FSO可用，但不会影响别人