(t%K+Y{gR0\I5QY(H0有两种主要的文件处理类型:
9nx3|(sqU8H6X0- 创建、添加或删除数据,以及读取文件
- 移动、复制和删除文件
创建文件
51Testing软件测试网,Koz&}WU/J$q创建空文本文件(有时被叫做“文本流”)有三种方法。51Testing软件测试网b1u~QC)z
51Testing软件测试网(y&zH i
F[8]第一种方法是用 CreateTextFile 方法。 下面的示例示范了在 VBScript 中如何用这种方法来创建文本文件:51Testing软件测试网9U1D+xh/|9Z(Hb
Dim fso, f1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile("c:\testfile.txt", True)
51Testing软件测试网as2_Js?a7[要在 Visual Basic Scripting Edition 中用这种方法,则使用下面的代码:51Testing软件测试网bE&d|1s(E(}6}0c
var fso, f1;
fso = new ActiveXObject("Scripting.FileSystemObject");
f1 = fso.CreateTextFile("c:\\testfile.txt", true);
51Testing软件测试网:K9m
mh%p创建文本文件的第二种方法是,使用 FileSystemObject 对象的 OpenTextFile 方法,并设置 ForWriting 标志。在 VBScript 中,代码就像下面的示例一样: 51Testing软件测试网)x|H7Q
B%[&Ta.PD
Dim fso, ts
Const ForWriting = 2
Set fso = CreateObject("Scripting. FileSystemObject")
Set ts = fso.OpenTextFile("c:\test.txt", ForWriting, True)
,b$D3L:R PV0要在 Visual Basic Scripting Edition 中使用这种方法来创建文本文件,则使用下面的代码:
:Q9V)I6DF(g2t v8pC0var fso, ts;
var ForWriting= 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
ts = fso.OpenTextFile("c:\\test.txt", ForWriting, true);
51Testing软件测试网 SF)vu5ob1|4s L4r创建文本文件的第三种方法是,使用 OpenAsTextStream 方法,并设置 ForWriting 标志。要使用这种方法,在 VBScript 中使用下面的代码:51Testing软件测试网:K0hKf+Ct(`
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)
51Testing软件测试网n/Y(z'A
|*B{:V在 Visual Basic Scripting Edition 中,则使用下面示例中的代码:
$M$X*O1YK)A5R.M0var 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);
添加数据到文件中
51Testing软件测试网k1Ro\[c]uK {J一旦创建了文本文件,使用下面的三个步骤向文件添加数据:
"E1g)Y(tHJZ0