一、创建文本文件的步骤如下:
1、创建 FileSystemObject 对象实例;
<% Set fso=Server.CreateObject("Scripting.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="VBScript" %><html><head><title>创建文件示例</title></head><body><p>正在写文件......</p><%'创建 FileSystemObject 对象实例Set fso=Server.CreateObject("Scripting.FileSystemObject")'创建一个文本文件并返回 TextStream对象Set txtFile=fso.CreateTextFile(Server.MapPath("poem.htm"),True)'对文件执行写操作txtFile.WriteLine "<HTML>"txtFile.WriteLine "<HEAD>"txtFile.WriteLine "<TITLE>望庐山瀑布</TITLE>"txtFile.WriteLine "</HEAD>"txtFile.WriteLine "<BODY>"txtFile.WriteLine "<DIV ALIGN=CENTER>"txtFile.WriteLine "<H3>望庐山瀑布</H3>[庸] 李白"txtFile.WriteLine "<HR width='50%' COLOR='#CC9999'>"txtFile.WriteLine "<P>日照香炉生紫烟,遥乍瀑布 前川。</P>"txtFile.WriteLine "<p>飞流直下三千尺,疑是银河落九天。</P>"txtFile.WriteLine "<p><p><A HREF='textStream.asp'>返回上一页</A>"txtFile.WriteLine "</DIV>"txtFile.WriteLine "</BODY>"txtFile.WriteLine "</HTML>"txtFile.Close%><DIV ALIGN="center"><P>文件创建成功!请单击下面的链接打开该文件:</P> <!--生成的poem.htm文件存放在创建它的文件 textStream.asp 同目录中。--><A HREF="poem.htm" TITLE="望庐山瀑布">查看文件</A> <A HREF="5-5-2.asp">返回上一页</A></DIV></BODY></HTML>
当执行这个页面后,将在这页面的同一目录下生成一个名为 poem.htm 的页面,其代码如下:
<HTML><HEAD><TITLE>望庐山瀑布</TITLE></HEAD><BODY><DIV ALIGN=CENTER><H3>望庐山瀑布</H3>[庸] 李白<HR width='50%' COLOR='#CC9999'><P>日照香炉生紫烟,遥乍瀑布 前川。</P><p>飞流直下三千尺,疑是银河落九天。</P><p><p><A HREF='textStream.asp'>返回上一页</A></DIV></BODY></HTML>
零七网部分新闻及文章转载自互联网,供读者交流和学习,若有涉及作者版权等问题请及时与我们联系,以便更正、删除或按规定办理。感谢所有提供资讯的网站,欢迎各类媒体与零七网进行文章共享合作。