ASP Line 属性

Line 属性返回在 TextStream 文件中的当前行号（从 1 开始）。

语法

 TextStreamObject.Line

实例

 <%
 dim fs,f,t
 set fs=Server.CreateObject("Scripting.FileSystemObject")
 set f=fs.CreateTextFile("c:\test.txt",true)
 f.WriteLine("Hello World!")
 f.WriteLine("How are you today?")
 f.WriteLine("Goodbye!")
 f.close

 Set t=fs.OpenTextFile("c:\test.txt",1)
 do while t.AtEndOfStream=false
   Response.Write("Line " & t.Line & ": ")
   Response.Write(t.ReadLine)
   Response.Write("<br>")
 loop
 t.Close
 %>

 输出：

 Line 1: Hello World!
 Line 2: How are you today?
 Line 3: Goodbye!