This Domain(Admin5.com) is for Sale:

处理文件

时间:2007-12-27  来源:不详  作者:林子

有两种主要的文件处理类型:

  • 创建、添加或删除数据,以及读取文件
  • 移动、复制和删除文件

创建文件

创建空文本文件(有时被叫做“文本流”)有三种方法。

copyright dedecms

第一种方法是用 CreateTextFile 方法。 下面的示例示范了在 VBScript 中如何用这种方法来创建文本文件:

本文来自织梦

Dim fso, f1

Set fso = CreateObject("Scripting.FileSystemObject")

Set f1 = fso.CreateTextFile("c:\testfile.txt", True) 织梦好,好织梦 

要在 JScript 中用这种方法,则使用下面的代码: 本文来自织梦

var fso, f1;

fso = new ActiveXObject("Scripting.FileSystemObject");

f1 = fso.CreateTextFile("c:\\testfile.txt", true); 织梦内容管理系统 

创建文本文件的第二种方法是,使用 FileSystemObject 对象的 OpenTextFile 方法,并设置 ForWriting 标志。在 VBScript 中,代码就像下面的示例一样:

织梦好,好织梦

Dim fso, ts

Const ForWriting = 2

Set fso = CreateObject("Scripting. FileSystemObject")

Set ts = fso.OpenTextFile("c:\test.txt", ForWriting, True) 

dedecms.com

要在 JScript 中使用这种方法来创建文本文件,则使用下面的代码: 织梦内容管理系统

var fso, ts;

var ForWriting= 2;

fso = new ActiveXObject("Scripting.FileSystemObject");

ts = fso.OpenTextFile("c:\\test.txt", ForWriting, true); copyright dedecms 

创建文本文件的第三种方法是,使用 OpenAsTextStream 方法,并设置 ForWriting 标志。要使用这种方法,在 VBScript 中使用下面的代码: 本文来自织梦

Dim fso, f1, ts

Const ForWriting = 2

Set fso = CreateObject("Scripting.FileSystemObject")

fso.CreateTextFile ("c:\test1.txt")

Set f1 = fso.GetFile("c:\test1.txt")

Set ts = f1.OpenAsTextStream(ForWriting, True) 织梦好,好织梦 

在 JScript 中,则使用下面示例中的代码: copyright dedecms

var fso, f1, ts;

var ForWriting = 2;

fso = new ActiveXObject("Scripting.FileSystemObject");

fso.CreateTextFile ("c:\\test1.txt");

f1 = fso.GetFile("c:\\test1.txt");

ts = f1.OpenAsTextStream(ForWriting, true); 
织梦内容管理系统

添加数据到文件中

一旦创建了文本文件,使用下面的三个步骤向文件添加数据:

本文来自织梦

打开文本文件。 dedecms.com

写入数据。 本文来自织梦

关闭文件。

copyright dedecms

要打开现有的文件,则使用 FileSystemObject 对象的 OpenTextFile 方法或 File 对象的 OpenAsTextStream 方法。 织梦内容管理系统

要写数据到打开的文本文件,则根据下表所述任务使用 TextStream 对象的 Write、WriteLine 或 WriteBlankLines 方法。

dedecms.com

任务 方法 向打开的文本文件写数据,不用后续一个新行字符。 Write 向打开的文本文件写数据,后续一个新行字符。 WriteLine 向打开的文本文件写一个或多个空白行。 WriteBlankLines

要关闭一个打开的文件,则使用 TextStream 对象的 Close 方法。 copyright dedecms

注重新行字符包含一个或几个字符(取决于操作系统),以把光标移动到下一行的开始位置(回车/换行)。注重某些字符串末尾可能已经有这个非打印字符了。

本文来自织梦

下面的 VBScript 例子示范了如何打开文件,和同时使用三种写方法来向文件添加数据,然后关闭文件:

内容来自dedecms

Sub CreateFile()

Dim fso, tf

Set fso = CreateObject("Scripting.FileSystemObject")


看完这篇,您有何感觉呢?

上一篇:Close 方法   下一篇:FileSystemObject 示例代码

文章评论

共有位Admini5网友发表了评论 查看完整内容

24小时热门信息