发新话题
打印

如何一行一行的读取文本文件内容?

如何一行一行的读取文本文件内容?

格式如:  

aa/bb  

11/22  

cc/dd  

但是我想一行一行读出来,用FSO对象怎么读,如果得到一个行数,能不能读出那一行  

的内容呢?

TOP

<%  
Set  AFileSystemObject  =  CreateObject("Scripting.FileSystemObject")  
Set  ATextStream  =  AFileSystemObject.OpenTextFile("C:\路径\filetest.txt")  
%>  
<h3>第一行的内容:</h3>  
<%  =  ATextStream.ReadLine  %>  
<h3>第二行的内容:</h3>  
<%  =  ATextStream.ReadLine  %>  
...

TOP

<%  
Set  MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)  
Set  MyTextFile=MyFileObject.OpenTextFile(“c:\mydir\test.txt”)  
While  not  MyTextFile.AtEndOfStream  
Response.Write(MyTextFile.ReadLine)  
Wend  
MyTextFile.Close  
%>

TOP

发新话题