发新话题
打印

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

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

TOP

发新话题