众所周知,FileSystemObject组件的强大功能及破坏性是它屡屡被免费主页 y!7B,
提供商(那些支持ASP)的禁用的原因,我整理了一下,本来只找到两种方法,后来 ojN`#%X
被某人一刺激,硬是想到第三种不为人所知的方法,呵呵,也不知道是不是这样的。 ?@Z7O.u
<KHv|)ak
第一种:用RegSrv32 /u C:\WINDOWS\SYSTEM\scrrun.dll(win98路径)来注销该组 #'J~Xk
件。此方法过于狠毒,属于同归于尽的方法,大家都没得用,是下招 Qy{NS.T
wD<vg3e[H
第二种:修改Progid的值,在ASP里调用组件的方式通常是 Set 对象名=Server. ]~?S~l%
CreateObject("Progid"),这时候我们就可以通过修改注册表中的Progid值从达 5"1!p3`\D{
到禁用该组件的方法。在 开始-运行中敲入regedit,然后找到HKEY_CLASSES_ROO /yx=7<
T\Scripting.FileSystemObject,这时候我们就可以更改该Progid的值了,如改 CCuxC9i7
成Scripting.FileSystemObject8。这样在ASP页里就这样调用了: 8_"3Yb`f
'is,^q:@
J*}VV9H
以下是代码片段: i'Y-V]->
<%@ Language=Vbscript%> <8iYL`3
<% g/OI|1a
Set Fs=Server.CreateObject("Scripting.FileSystemObject8") ISpeV
%> eZynF<i
:6 Uk)
AGh~8[
(如果你前面没有调用过该组件的话,则无须重启,就可以看到效果了,否则请重 536^PcJlN
启后看效果。)
P7}t lHX
这时候我们看看还是用原来的调用方法的结果: lP}o[Rd
*w=z~Jq^R"
以下是代码片段: ^Lsc`<xC
<%@ Language=Vbscript%> (YAI,Xnw
<% MPjr_yc]
Set Fs=Server.CreateObject("Scripting.FileSystemObject") w>v5oy8s-
%> !IO&&\5
d-hbvLn
$TR=3[j
uPFRh~ (b
这时候的运行结果为: NU|qX {-
服务器对象 错误 'ASP 0177 : 800401f3' _mw13jcN]
53bM+
Server.CreateObject 失败 1T!cc%ah
Lqg]Fd
/aspimage/testfile2.asp, 行3 U!x0,sr
63.( j P1;
800401f3 XQK^$Iq]V
(OK,达到我们的要求) T48BRVX-F
该方法由于本人迟了两步,结果就让别人抢着回答了,这样极大的刺激了我,结 u06tDJ[
果就产生了第三种方法。 !K!)S^^Po?
-_s%8l^
第三种:细心的高手们会想,既然能通过修改Progid值来禁用该组件,那Clsid是 DD2adu^
否也可以来修改呢?(OK,你想得和我一样)我们知道,除了CreateObject方法以 )i&%cyZw
外,也可以使用一般的标注建立一个组件,我们可以在ASP里面使用HTM \'[3^/('
L的标注,以便在网页中加入一个组件。方法是: s;s0}Td_1
s5Pq$<
以下是代码片段: b([:,T7
<object runat=server id=fs1 scope=page progid="Scripting.FileSystemObj y^9bfMA
ect"></object> I9;xz ES
S<V-ZV&_:U
<BZ_ (H
1d`cTaQ-
Runat表示是在服务端执行,Scope表示组件的生命周期,可以选用Session,Appl JK[T]|G
ication或page(表示当前页面,也可缺省) pV8[l) J
这种写法对我们没用,还有一种写法是: {!lNL[x
P_Z M'[
以下是代码片段: P2O\!'aEh
<object runat=server id=fs1 scope=page classid="clsid:clsid的值"></obj uG4$2
ect> HHZ`%
-4 8`#"xy
KrS
wc"9A~
我们也可以通过修改该Clsid的值而禁用该组件,如将注册表中HKEY_CLASSES_RO "";=DH
OT\Scripting.FileSystemObject\CLSID的值0D43FE01-F093-11CF-8940-00A0C90 J)_>%.
54228改成0D43FE01-F093-11CF-8940-00A0C9054229(改了最后面一位),这时候的 wqcDAO(
写法为: Ys-^7
y_
-jFP7tEv
以下是代码片段: $Ru&>D#stK
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 Jl\'V
CF-8940-00A0C9054229"></object> 3] N q@t
wXz\NGW
>A<Df
看运行结果,没问题,OK。这时候我们再用 *E.LP1xP
+.=1^+a
以下是代码片段: ;;M"hI3@
<object runat=server id=fs1 scope=page classid="clsid:0D43FE01-F093-11 ]7*kWc2
CF-8940-00A0C9054228"></object> ;3mL^
>8%M*-=p
Ha?G=X
lHcA j{6
这时候就出错了。 <&`:&