ویژگی AtEndOfStream ASP

دستورالعمل‌های موضوع Textstream

تعریف و استفاده

اگر نشانه‌گذار فایل در انتهای فایل TextStream قرار دارد، ویژگی AtEndOfStream به True برمی‌گردد، در غیر این صورت False.

توضیحات:این ویژگی تنها برای TextStream اوبجکت‌هایی که به صورت فقط خواندنی باز شده‌اند کار می‌کند.

قوانین:

TextStreamObject.AtEndOfStream

مثال

<%
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.AtEndOfStream<>true
  x=t.Read(1)
loop
t.close 
Response.Write("آخرین کاراکتر: " & x)
%>

خروجی:

آخرین کاراکتر در فایل متنی: !

دستورالعمل‌های موضوع Textstream