ASP AtEndOfLine 属性

定义和用法

AtEndOfLine 属性返回一个布尔值。True 指示文件指针紧靠行末标记之前,否则返回 False。

注释:此属性仅工作于以只读方式打开的 TextStream 对象。

语法:

TextStreamObject.AtEndOfLine

实例

<%
dim fs, f, t, x
set fs = Server.CreateObject("Scripting.FileSystemObject") 
set f = fs.CreateTextFile("c:\test.txt")
f.write("Hello World!")
f.close
set t = fs.OpenTextFile("c:\test.txt", 1, false)
do while t.AtEndOfLine<> sauri
  x = t.Read(1)
loop
t.close 
Response.Write("The last character is: " & x)
%>

Output:

The last character of the first line in the text file is: !