File 对象 提供对文件的所有属性的访问. 说明 以下代码举例说明如何获得一个 File 对象并查看它的属性: Function ShowDateCreated(filespec) Dim fso,f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) ShowDateCreated = f.DateCreatedEnd Function 以上是小编为您精心准备的的内容,

FileSystemObject 对象 提供对计算机文件系统的访问. 说明 以下代码举例说明如何使用 FileSystemObject 对象返回一个 TextStream 对象,此对象可以被读取或写入: Dim fso, MyFileSet fso = CreateObject("Scripting.FileSystemObject")Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)MyFile.Wri

Drive 对象 提供对磁盘驱动器或网络共享的属性的访问. 说明 以下代码举例说明如何使用 Drive 对象访问驱动器的属性: Function ShowFreeSpace(drvPath)Dim fso, d, s Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvPath)) s = "驱动器 " & UCase(dr

Folders 集合 包含在一个 Folder 对象中的所有 Folder 对象的集合. 说明 以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员: Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec)

Folder 对象 提供对文件夹所有属性的访问. 说明 以下代码举例说明如何获得 Folder 对象并查看它的属性: Function ShowDateCreated(folderspec) Dim fso, f, Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec) ShowDateCreated = f.DateCreatedEnd Function 以上是小编为

Matches 集合 正则表达式 Match 对象的集合. 说明 Matches 集合中包含若干独立的 Match 对象,只能使用 RegExp 对象的 Execute 方法来创建之.与独立的 Match 对象属性相同,Matches `集合的一个属性是只读的. 在执行正则表达式时,可能产生零个或多个 Match 对象.每个 Match 对象都提供了与正则表达式匹配的字符串的访问入口.字符串的长度,以及标识匹配位置的索引. 下面的代码将说明如何使用正则表达式查找获得 Matches 集合,以及如

Match 对象 提供了对正则表达式匹配的只读属性的访问. 说明 Match 对象只能通过 RegExp 对象的 Execute 方法来创建,该方法实际上返回了 Match 对象的集合.所有的 Match 对象属性都是只读的. 在执行正则表达式时,可能产生零个或多个 Match 对象.每个 Match 对象提供了被正则表达式搜索找到的字符串的访问.字符串的长度,以及找到匹配的索引位置等. 下面的代码说明了 Match 对象的用法: Function RegExpTest(patrn, strng

Files 集合 文件夹中所有 File 对象的集合. 说明 以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员:  Function ShowFolderList(folderspec) Dim fso, f, f1, fc, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFolder(folderspec) Set fc = f.File

Drives 集合 只读所有可用驱动器的集合. 说明 无论是否插入媒体,可移动媒体驱动器都显示在 Drives 集合中. 以下代码举例说明如何获得 Drives 集合并使用 For Each...Next 语句枚举集合成员: ShowDriveList 函数 Dim fso, d, dc, s, n Set fso = CreateObject("Scripting.FileSystemObject") Set dc = fso.Drives For Each d in dc n =