日期:2014-05-17  浏览次数:20928 次

求一段ASP读取多行文本文件最简单代码,50分
如题,有一多行文本文件
要求使用最简单的代码把文件全部读取出来

------解决方案--------------------
dim fso, f
set fso = server.CreateObject( "Scripting.FileSystemObject ")
set f = fso.OpenTextFile( "C:\test.txt ", 1, false) '第二个参数 1 表示只读打开,第三个参数表示目标文件不存在时是否创建
response.Write f.ReadAll() '从当前位置向后读取,直到文件结束,并将当前位置移动到文件的最后
f.Close()
set f = nothing
set fso = nothing
------解决方案--------------------
strTmp=Server.CreateObject( "scripting.filesystemobject ").OpenTextFile(Server.Mappth( "我的文本.txt "),1,false).Readll
------解决方案--------------------
Dim fso,ts,myfile,s
Set fso=Server.CreateObject( "scripting.filesystemobject ")
myfile=Server.MapPath(你的文件)
Set ts=fso.OpenTextFile(myfile)
s=ts.ReadAll
Response.Write s
set fso=nothing