ASP入门基础教程-创建文本文件

一、创建文本文件的步骤如下：

　　 1、创建 FileSystemObject 对象实例；

　　　 <% Set fso=Server.CreateObject("scripqing.FileSystemObject") %>

　　 2、创建 TextStream 对象实例；

　　　 <% txtFile=fso.CreateTextFile(filename[,overwrite[,unicode]]) %>

　　 3、使用 TextStream 对象的方法对文件进行写操作。

　　 使用 CreateTextFile 方法创建一个文本文件后，可以使用 TextStream 对象的方法对该文件进行写操作，主要有以下方法：

　　1）使用 Write 方法向 TextStream 文件写入字符串，语法格式如下：

txtFile.Write(string)

　　其中 txtFile 是必选参数，应为 TextSteam 文件对象的名称。string 是可选参数，指定要写入文件的文本。

　　2） 使用 WriteLine 方法向 TextStream 文件写入指定字符串和新行字符，语法格式如下：

txtFile.WriteLine(string)

　　其中 txtFile 是必选参数，应为 TextSteam 文件对象的名称。string 是可选参数，指定要写入文件的文本。如果省略，将向文件写入新行字符。

　　3） 使用 WriteBlankLines 方法在 TextStream 文件中写入指定数目的新行字符，语法格式如下：

txtFile.WriteBlankLines(lines)

　　其中 txtFile 是必选参数，应为 TextSteam 文件对象的名称。Lines 也是必选参数，指定要向文件写入的新行字符数目。

　　4）使用 Close 方法关闭打开的 TextStream 文件，语法格式如下：

txtFile.Close

　　二、TextStream 对象的属性和方法：

　　 1、TextStream 对象的属性

TextStream 对象的属性　

属　性	描　　　　　　 述
AtEndOfLine	若文件指针位于文件中某一行的尾端，返回 True，否则返回 False。
AtEndOfStream	若文件指针位于文件的尾端，返回 True ，否则返回 False 。
Column	返回文件指针位于文件当前行的第几列。
Line	返回文件指针位于文件当前行的第几行。

　　　　 　　　　

　　2、TextStream 对象的方法

TextStream 对象的方法 <表二>

　　

方　法	描　　　　　　　　　述
Close	关闭文件。
Read(Num)	从文件指针的位置读取后面的Num个字符，然后存放至字符串。
ReadAll	读取整个文件，然后存放至字符串。
ReadLine	从文件指针的位置读取一行，然后存放至字符串。
Skip(Num)	读取文件时跳过 Num 个字符。
SkipLine	读取文件跳过一行。
Write(Strion)	将字符串 String 写入文件。
WriteLine(Sring)	将字符串 String 写入文件，并在字符串的后面加上换行字符 （vbCrLf) ，若没有指定 String ，表示写入一个空行。
WriteBlankLines(Num)	将Num 个换行字符 （vbCrLf) 写入文件，即写入 Num 个空行。

　　 三、实例：本实例说明如何利用 TextStream 对象的属性和方法创建一个文本文件并对其执行写操作。代码如下：

<% @ language="VBscripq" %>

正在写文件......

<%
'创建 FileSystemObject 对象实例
Set fso=Server.CreateObject("scripqing.FileSystemObject")
'创建一个文本文件并返回 TextStream对象
Set txtFile=fso.CreateTextFile(Server.MapPath("poem.htm"),True)
'对文件执行写操作
txtFile.WriteLine ""
txtFile.WriteLine ""
txtFile.WriteLine " "
txtFile.WriteLine ""
txtFile.WriteLine ""
txtFile.WriteLine "

"
txtFile.WriteLine "

望庐山瀑布

[庸] 李白"
txtFile.WriteLine "

---

"
txtFile.WriteLine "

日照香炉生紫烟，遥乍瀑布抂前川。

"
txtFile.WriteLine "

飞流直下三千尺，疑是银河落九天。

"
txtFile.WriteLine "

返回上一页"
txtFile.WriteLine "

"
txtFile.WriteLine ""
txtFile.WriteLine ""
txtFile.Close
%>

文件创建成功！请单击下面的链接打开该文件：

查看文件   返回上一页

　　当执行这个页面后，将在这页面的同一目录下生成一个名为 poem.htm 的页面，其代码如下：

望庐山瀑布

[庸] 李白

---

日照香炉生紫烟，遥乍瀑布抂前川。

飞流直下三千尺，疑是银河落九天。

返回上一页