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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 eYx Kp!f  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 F2X0%te  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 (h:Rh  
QY== GfHt  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 eF2|Wjl``;  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 qe5feky  
1^gl}^|B  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. ,0LU~AGe   
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 =hl}.p  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO /Z7iLq~t"G  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 ,a#EW+" Z  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： + nF'a(  
Y".RPiTL  
yr,=.?C-  
以下是代码片段： kZ"BBJ6w  
<%@ Language=Vbscript%> |fo0  
<% TsTPj8GAl[  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") _o8?E&d  
%> <I;2{*QI2  
)m. 4i=X  
zl`h~}I  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 W5R\Q,x6  
启后看效果。) q:g2Zc'Y~W  
这时候我们看看还是用原来的调用方法的结果： =G]@+e  
a0Zv p>Ft  
以下是代码片段： 33}oO,}t,  
<%@ Language=Vbscript%> Rn@#d}  
<% "Iix )Ue  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") jRatm.N  
%> YID4w7|  
Tyck/ EO  
IH"6? 9nd  
C"{k7yT  
这时候的运行结果为： :<|<|qJWo  
服务器对象 错误 'ASP 0177 : 800401f3' *oybD=%4  
h\'n**f_x  
Server.CreateObject 失败 /soKucN"h  
@$z<i `4  
/aspimage/testfile2.asp, 行3 AQ='|%  
dh $bfAb  
800401f3 O]m+u  
(OK，达到我们的要求) nWHa.H#  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 y\x+  
果就产生了第三种方法。 <'g:T
(t  
BXyo  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 iya"ky~H  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 I&YSQK:b  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM dc rSz4E|>  
L的标注，以便在网页中加入一个组件。方法是： ~^cMys |'  
5>TK^1 :  
以下是代码片段： M4W5f#C5Ee  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj x@Hc@R<!  
ect"></object> wT{nu[=GH*  
=ha{Ziryo  
&/Q0  
p"U,G -_  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl RZCq{|L  
ication或page(表示当前页面，也可缺省) pf7it5  
这种写法对我们没用，还有一种写法是: O &-wxJ]S  
`F>O;>i''  
以下是代码片段： PV=5UyjW  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj a.zpp'cEb  
ect> /QJ?bD#a  
Q0ON9gqqv  
s S7c!  
c[ ]4n  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO YGsWu7dG  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 NW&b&o  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 "%x<ttLl  
写法为： Zp#v Hs  
/n8B,-Z5s5  
以下是代码片段： c=`wg$2:5  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 _:"<[ >9  
CF-8940-00A0C9054229"></object> ,YMp<C  
TU 1I} ,  
(/j); oSK  
看运行结果，没问题，OK。这时候我们再用 o+$7'+y1n-  
b 'pOJ
S  
以下是代码片段： ,c)uX#1  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 QD>"]ap,o  
CF-8940-00A0C9054228"></object> KkE9KwZ]W  
]]wA[c~G  
^!by3Elqqk  
BV[5}  
这时候就出错了。 #gcF"L||  
1OF& *  
新建一用户：iusr_domain aqc?pqM  
IIS里设置对应站点的匿名用户IUSR_DOMAIN UQI]>#_/v  
CACLS： 设置目录权限 E0?iXSJ  
6<ZkJ:=  
这样FSO可用，但不会影响别人