TextStream对象是通过Scripting.FileSystemObject对象的CreateTextFile或
OpenTextFile或OpenAsTextStream方法创建并返回的一个可以对文件进行操作的
对象.
1. TextStream对象的属性
TextStream的属性提供有关文件内文件指针当前位置的信息,如表5-15所示。注
意,所有的属性是只读的。
表5-15 TextStream对象的属性及说明
属 性
说 明
AtEndOfLine
如果文件位置指针在文件中一行的末尾则返回True
AtEndOfStream
如果文件位置指针在文件的末尾则返回True
Column
从1开始返回文件中当前字符的列号
Line
从1开始返回文件中当前行的行号
AtEndOfLine和AtEndOfStream属性仅对以iomode参数为ForReading的方式打开的
文件可用,否则将会出错。
2. TextStream对象的方法
TextStream对象的方法如表5-16所示:
表5-16 TextStream对象的方法及说明
方 法
说 明
Close()
关闭一个打开的文件
Read(numchars)
从文件中读出numchars个字符
ReadAll()
作为单个字符串读出整个文件
ReadLine()
作为一个字符串从文件中读出一行(直到回车符和换行)
Skip(numchars)
当从文件读出时忽略numchars个字符
SkipLine()
当从文件读出时忽略下一行
Write(string)
向文件写入字符串string
WriteLine(string)
向文件写入字符串string(可选)和换行符
WriteBlankLines(n)
向文件写入n个换行符
3. 写文本文件
一旦使用CreateTextFile、OpenTextFile或OpenAsTextStream方法以及
ForWriting或ForAppending参数,创建一个对应于某个文件的TextStream对象,
可以用下面的VBScript程序写文件和关闭文件:
' In VBScript:
objTStream.WriteLine "At last I can create files with VBScript!"
objTStream.WriteLine
objTStream.WriteLine "Here are three blank lines:"
objTStream.WriteBlankLines 3
objTStream.Write "... and this is "
objTStream.WriteLine "the last line."
objTStream.Close
或者用JScript:
// In JScript:
objTStream.WriteLine('At last I can create files with JScript! ');
objTStream.WriteLine();
objTStream.WriteLine('Here are three blank lines: ');
objTStream.WriteBlankLines(3);
objTStream.Write('... and this is ');
objTStream.WriteLine('the last line. ');
objTStream.Close();
4. 读文本文件
一旦使用CreateTextFile、OpenTextFile或OpenAsTextStream方法以及
ForReading参数,创建一个对应于某个文件的TextStream对象,可以用下面的
VBScript程序读文件和关闭文件:
' In VBScript:
'read one line at a time until the end of the file is reached
Do While Not objTStream.AtEndOfStream
'get the line number
intLineNum = objTStream.Line
'format it as a 4-character string with leading zeros
strLineNum = Right("000" & CStr(intLineNum), 4)
'get the text of the line from the file
strLineText = objTStream.ReadLine
Response.Write strLineNum & ": " & strLineText & "<BR>"
Loop
objTStream.Close
或用JScript:
// In JScript:
// read one line at a time until the end of the file is reached
while (! objTStream.AtEndOfStream) {
// get the line number
intLineNum = objTStream.Line;
// format and convert to a string
strLineNum = '000' intLineNum.toString();
strLineNum = substr(strLineNum, strLineNum.length – 4, 4)
// get the text of the line from the file
strLineText = objTStream.ReadLine();
Response.Write(strLineNum ': ' strLineText '<BR>');
}
objTStream.Close();
TextStream对象成员概要
最新推荐文章于 2017-04-18 14:28:13 发布