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>")
bucle
t.Close
%>

Salida:

Línea 1: ¡Hola Mundo!
Línea 2: ¿Cómo estás hoy?
Línea 3: ¡Adiós!