都在帮助文件里面
FileSystemObject 对象
请参阅 示例 属性 方法 事件 特性
描述
提供对计算机文件系统的访问。
语法
Scripting.FileSystemObject
说明
下面的代码举例说明了如何使用 FileSystemObject 返回一个 TextStream 对象,该对象是可读并可写的:
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine("This is a test.")
a.Close
在上面列出的代码中,CreateObject 函数返回 FileSystemObject (fs)。CreateTextFile 方法接着创建文件作为一个 TextStream 对象(a),而 WriteLine 方法则向创建的文本文件中写入一行文本。Close 方法刷新缓冲区并关闭文件。
Folders 集合
请参阅 示例 属性 方法 事件 特性
描述
包含在一个 Folder 对象内的所有 Folder 对象的集合。
说明
下面的代码举例说明了如何获得一个 Folders 集合,以及如何用 For Each...Next 语句来访问该集合中的每个Folder:
Sub ShowFolderList(folderspec)
Dim fs, f, f1, fc, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
Set fc = f.SubFolders
For Each f1 in fc
s = s & f1.name
s = s & vbCrLf
Next
MsgBox s
End Sub
Folder 对象
请参阅 示例 属性 方法 事件 特性
描述提供对一个文件夹所有属性的访问。说明下面的代码举例说明了如何获得一个 Folder 对象,以及如何返回它的一个属性:Sub ShowFolderInfo(folderspec)
Dim fs, f, s,
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
s = f.DateCreated
MsgBox s
End Sub