FileSystemObject 对象

提供对计算机文件系统的访问。

说明

以下代码举例说明如何使用 FileSystemObject 对象返回一个 TextStream 对象，此对象可以被读取或写入：

Dim fso, MyFileSet fso = CreateObject("Scripting.FileSystemObject")Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)MyFile.WriteLine("This is a test.")MyFile.Close

以前代码中，CreateObject 函数返回 FileSystemObject 对象 (fso)。CreateTextFile 方法创建一个文件作为 TextStream 对象 (a)，然后 WriteLine 方法在此文件中写入一行文本。最后 Close 方法刷新缓冲区并关闭文件。