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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 8hfh,v5(  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 -Tx tX8v  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 SS~Q;
9o  
u^9c`  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 w!RH*S  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 .7FI%  
S+G)&<a^  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. [//f BO  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 aAM UJk  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO MDPMOA  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改
aC:l;  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： l'T0<  
p#d UL9  
G,-OH-M!  
以下是代码片段： j%;)CV G"  
<%@ Language=Vbscript%> F21[r!3  
<% HH?*"cKF~  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") r<v%Zp  
%> O:
)IRB3  
gpWS_Dw9  
[R>  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 ^mpB\D)q  
启后看效果。) @UX@puK`/  
这时候我们看看还是用原来的调用方法的结果： =fG8YZ(  
@W8}N|jek  
以下是代码片段： DZRxp,  
<%@ Language=Vbscript%> a`*WpP\+  
<% :$aW@?zAY  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") %Be[DLtE"  
%> SWb5K0YRn  
>EtP^Lu~f_  
lg>AWTW[  
lM*O+k  
这时候的运行结果为： `uA&w}(G  
服务器对象 错误 'ASP 0177 : 800401f3' Nh9!lBm*]  
=bWq 3aP)P  
Server.CreateObject 失败 }!V<"d,!  
)c/y07er  
/aspimage/testfile2.asp, 行3 )`mF.87b&h  
dY<#a,eS  
800401f3 >;v0zE  
(OK，达到我们的要求) ;|QR-m2/  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 acY[?L_6J  
果就产生了第三种方法。 v:MS0]  
2TEeP7  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 RCYbRR4y  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 "n }fEVJ,  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM Q+(:n)G_6E  
L的标注，以便在网页中加入一个组件。方法是： /'6[*]IZP  
9Fx z!-9m  
以下是代码片段： Ko)T>8:  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj T zYgH  
ect"></object> NB5B$q_'#  
?]D+H%3[$i  
#0^3Wm`X;  
D{c>i`\G  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl sFCs_u1tNN  
ication或page(表示当前页面，也可缺省) E)wT+\  
这种写法对我们没用，还有一种写法是: zl 0^EltiU  
;n{j,HB  
以下是代码片段： dG>Wu o  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj 8/?uU]#Q  
ect> l=~99m
E  
}|"*"kxi!  
`OReSg 2  
b[o"Uq@8?  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO 50bP&dj&  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 |uwteG5?$s  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 TL{pc=eBo  
写法为： ku9FN  
X/,1]  
以下是代码片段： j_uY8c>3\q  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 *2 $m>N  
CF-8940-00A0C9054229"></object> #'Y6UGJ\n  
LY!3u0PnlT  
(Zn3-t*  
看运行结果，没问题，OK。这时候我们再用 q\y#  
9Q7cUoxY  
以下是代码片段： `[` *@O(y  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 A;j$rGx  
CF-8940-00A0C9054228"></object> sFM>gG  
n[:AV  
Q0uO49sg  
YZ:'8<  
这时候就出错了。 m\Fb ,  
5`'au61/2  
新建一用户：iusr_domain ?Gv!d  
IIS里设置对应站点的匿名用户IUSR_DOMAIN `)!2E6 =  
CACLS： 设置目录权限 +6)kX4  
9 roth  
这样FSO可用，但不会影响别人