|
METHOD:
TextStream.SkipLine
object.SkipLine
Moves the file pointer from it's current position to the beginning of the next line.
Code:
<%
dim filesys, text, readfile, contents
set filesys =
CreateObject("Scripting.FileSystemObject")
Set text = filesys.CreateTextFile("c:\somefile2.txt")
text.WriteLine "A quick example of the SkipLine method"
text.WriteLine "Well, maybe not so quick!"
text.WriteLine "This should be enough!"
text.close
set readfile =
filesys.OpenTextFile("c:\somefile2.txt", 1, false)
readfile.SkipLine
contents =
readfile.ReadLine
readfile.close
Response.Write
"Line 2 contains the following text - '" & contents & "'."
%>
Output:
"Line 2 contains the following text - 'Well, maybe not so quick!'."
Copyright 1999 by Infinite Software Solutions, Inc.
Trademark Information
|