关于fso读取txt文件,然后显示的问题!
cg2 2003-03-08 03:09:53 关于fso读取txt文件,然后显示的问题!
下面的asp读取一个txt文件,然后显示给客户端,但是我有2台服务器,
一台机器上,下列程序运行正常,另一台上却出现长时间的等待,状态栏显示:正在打开网页
等1个小时也不出来,是不是iis上需要设置什么权限阿?因为那台能够正常运行的机器不是我配置的,所以请大家帮帮忙,这个问题如何解决?
正常运行的是 w2k Adv server ,不正常的是winXP PROF
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim tpath
dim strtext
public sub loadTemplate()
Const ForReading=1,ForWriting=2, ForAppending=3
const TristateFalse=0,TristateUseDefault=-2,TristateTrue=-1
Dim fs,f
Set fs = server.CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile(Server.MapPath(tpath),forreading,TristateFalse)
strText=f.readAll
f.close
set f=nothing
set fs=nothing
end sub
tpath="tp.txt"
loadtemplate
%>
<%=strtext%>