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

众所周知，FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 G+#| )V  
提供商(那些支持ASP)的禁用的原因，我整理了一下，本来只找到两种方法，后来 Sy+]SeF&  
被某人一刺激，硬是想到第三种不为人所知的方法，呵呵，也不知道是不是这样的。 |xsV(jK8  
AiyvHt  
第一种：用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 f>\bUmk(  
件。此方法过于狠毒，属于同归于尽的方法，大家都没得用，是下招 Vq\..!y  
U}RS*7`  
第二种：修改Progid的值，在ASP里调用组件的方式通常是 Set 对象名=Server. VgFF+Eg  
CreateObject("Progid")，这时候我们就可以通过修改注册表中的Progid值从达 b*'=W"%\  
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO !LHzY(  
T\Scripting.FileSystemObject，这时候我们就可以更改该Progid的值了，如改 RvyBg:Aj5  
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了： l6&v}M  
Ie^Dn!0S  
1K? & J2  
以下是代码片段： !^>LOH>j  
<%@ Language=Vbscript%> AhbT/  
<% ADLa.{  
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") qrkRD*a  
%> 66^1&D"  
in=k:j,U0  
Ac5o K  
(如果你前面没有调用过该组件的话，则无须重启，就可以看到效果了，否则请重 O?j98H Sya  
启后看效果。) &J6o$i  
这时候我们看看还是用原来的调用方法的结果： RS||KA])J  
L#7)X5a__  
以下是代码片段： .q_uJ_qu-  
<%@ Language=Vbscript%> -CU7u=*b  
<% A]tf>H#1  
Set Fs=Server.CreateObject("Scripting.FileSystemObject") Kh:#S|
  
%> hSx+{4PZ  
$+lz<~R  
6yu*a_  
lry&)G=5  
这时候的运行结果为： D_yY0rRM  
服务器对象 错误 'ASP 0177 : 800401f3' m]-v IUpb  
A/$K
A'jX  
Server.CreateObject 失败 A1k&` |k  
PNxV
W  
/aspimage/testfile2.asp, 行3 [/+dHW|  
sO{0hZkc  
800401f3 -KIVnV=&m  
(OK，达到我们的要求) |oBdryi  
该方法由于本人迟了两步，结果就让别人抢着回答了，这样极大的刺激了我，结 (jo(bbpj  
果就产生了第三种方法。 _M"$5 T  
'&pf  
第三种：细心的高手们会想，既然能通过修改Progid值来禁用该组件，那Clsid是 *&hXJJ[+  
否也可以来修改呢？(OK，你想得和我一样)我们知道，除了CreateObject方法以 {0)WS}&  
外，也可以使用一般的标注建立一个组件，我们可以在ASP里面使用HTM -hG 9  
L的标注，以便在网页中加入一个组件。方法是： 9p[W :)P4d  
6wpND|cT  
以下是代码片段： vHI"C %  
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj < ;%q  
ect"></object> NqQ(X'W7
 
px [1#*  
1VjeP *  
XY+au
nLf  
Runat表示是在服务端执行，Scope表示组件的生命周期，可以选用Session,Appl /4"S}P>f  
ication或page(表示当前页面，也可缺省) /K1$_  
这种写法对我们没用，还有一种写法是: l9ifUhe  
D25gg  
以下是代码片段： {o
5K?Pb  
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj 9A} kkMB:  
ect> j0pvLZjM  
:_~PU$%0  
H%NLL4&wu  
9$Pl'>5  
我们也可以通过修改该Clsid的值而禁用该组件，如将注册表中HKEY_CLASSES_RO F'5d\v  
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 :`>+f.)  
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位)，这时候的 Z z;<P  
写法为： {Jw<<<G  
W &0@&
U  
以下是代码片段： XJxs4a1[t  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11  jC/JiI  
CF-8940-00A0C9054229"></object> (;2J(GZ:$U  
od5w9E.  
:LIKp;  
看运行结果，没问题，OK。这时候我们再用 l6`d48U
 
2;?wN`}5g=  
以下是代码片段： 3ciVjH>i  
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 7ck0S+N'b  
CF-8940-00A0C9054228"></object> +sR *d  
hml\^I8Q>F  
i3kI2\bd/  
#Rm=Em}d  
这时候就出错了。 @Pb 1QLiz  
d"d)<f   
新建一用户：iusr_domain &W!d}, ;  
IIS里设置对应站点的匿名用户IUSR_DOMAIN a5U2[Ko80  
CACLS： 设置目录权限 bF Y)o Z  
kkE)zF   
这样FSO可用，但不会影响别人