众所周知,FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 57'=Qz52
提供商(那些支持ASP)的禁用的原因,我整理了一下,本来只找到两种方法,后来 is}o5\JEL
被某人一刺激,硬是想到第三种不为人所知的方法,呵呵,也不知道是不是这样的。 ?>N82#9Q
?"$W=*P\o
第一种:用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 4d)w2t?H%
件。此方法过于狠毒,属于同归于尽的方法,大家都没得用,是下招 L"rLalUw
3Wrl_V
第二种:修改Progid的值,在ASP里调用组件的方式通常是 Set 对象名=Server. \7nlwFAO
CreateObject("Progid"),这时候我们就可以通过修改注册表中的Progid值从达 xAMj 16ZF
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO 4NMv7[r
T\Scripting.FileSystemObject,这时候我们就可以更改该Progid的值了,如改 1M7=*w,
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了: %np b.C|+
g^26Gb.
?D/r1%Z
以下是代码片段: iOm~
<%@ Language=Vbscript%>
.7ESPr
<% g2l|NI#c^
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") c@1C|
%> xG
7;Ps4L
YES!?^}
m0t5oO
(如果你前面没有调用过该组件的话,则无须重启,就可以看到效果了,否则请重 WW2VW-Hk
启后看效果。) E1_FK1*V;
这时候我们看看还是用原来的调用方法的结果: !T@>Ld:
/7De.O~H
以下是代码片段: =i~/.Nu&
<%@ Language=Vbscript%> dGAthbWJ
<% l7Y^C1hM
Set Fs=Server.CreateObject("Scripting.FileSystemObject") !!E_WDZ#9
%> [-bL>8
xojy[c#
w:I^iI.
^QTl (L
这时候的运行结果为: yHLclv
服务器对象 错误 'ASP 0177 : 800401f3' >P/kb fPA
A0# K@
Server.CreateObject 失败 eC%.xu^
9aD6mp
/aspimage/testfile2.asp, 行3 ZalG/PFy
1wmS?
800401f3 j9XY%4.
(OK,达到我们的要求) =<s+cM
该方法由于本人迟了两步,结果就让别人抢着回答了,这样极大的刺激了我,结 ,miU'<8tQ|
果就产生了第三种方法。 ~O?Gi 4^Yg
81V,yq]
第三种:细心的高手们会想,既然能通过修改Progid值来禁用该组件,那Clsid是 J)Dw` =O0n
否也可以来修改呢?(OK,你想得和我一样)我们知道,除了CreateObject方法以 2f] :n
外,也可以使用一般的标注建立一个组件,我们可以在ASP里面使用HTM EMU~gwPR
L的标注,以便在网页中加入一个组件。方法是: %}j.6'`{
di]z
以下是代码片段: zNuiBLxDs
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj cRsLt/Wr
ect"></object> %gSqc
}v*
+ 1\1Z@\M
4JKB6~Y
Vj_(55WQ
Runat表示是在服务端执行,Scope表示组件的生命周期,可以选用Session,Appl *Af]?-|^{#
ication或page(表示当前页面,也可缺省) :T"!6;
这种写法对我们没用,还有一种写法是: T/p}Us
Wz nz
以下是代码片段: )TJz'J\*
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj a8rsF
ect> hi"[R@UG
"Y}f"X|
?t$sju(\
qEX2K^y'4"
我们也可以通过修改该Clsid的值而禁用该组件,如将注册表中HKEY_CLASSES_RO m>k
j @^SQ
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 l %=yT6
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位),这时候的 FVMR9~&+
写法为: E
`Ualai
6_=qpP-?
以下是代码片段: PwQW5,,h0
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 ,*Y*ov23aQ
CF-8940-00A0C9054229"></object> 7)O?jc
5s8S;Pb]<