Asp初学者常见问题十二如何用FSO读取文本文件

王朝asp·作者佚名  2006-12-16
窄屏简体版  字體: |||超大  

很多朋友问到这样的问题,这里提供代码,该代码以只读方式打开,并可以显示行号,如果想修改的话,只需把打开时的属性改一下即可

<%

strtextfile = server.mappath("your_file.txt") '取得文本文件的绝对路径

set objfso = server.createobject("scripting.filesystemobject") '创建一个FSO对象的实例

%>

<textarea name="txtcontent" rows=10 cols=50 wrap="physical">

<%

set objstream = objfso.opentextfile(strtextfile,foreading) '以只读方式打开文本文件

do while not objstream.atendofstream '如果当前指针不在objstream流末尾

intlineNum = objstream.line '获取文本文件的行数

strlinenum = right("00" & cstr(intlinenum,3)) '对行数进行格式化

strlinetext = objstream.readline '逐行读取文本内容

response.write strlinenum &":" & strlinetext & vbCrLf '以行号:文本内容这种形式输出+回车换行

loop

objstream.close '关闭stream对象

%>

</textarea>

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航