2024年3月18日发(作者:)

FileSystemObject对象位于File System对象模型的最高层,并且是该层次中惟一可

以在外部创建的对象,也就是说它是惟一能使用New关键字的对象。

FileSystemObject对象有许多用来操作文件系统的方法和属性。下面先看一个例子,

如下面的代码:

Sub FileInfo()

Dim fs As Object

Dim objFile As Object

Dim strMsg As String

Set fs = CreateObject("stemObject")

Set objFile = e("C:")

strMsg = "文件名:" & & vbCrLf

strMsg = strMsg & "硬盘:" & & vbCrLf

strMsg = strMsg & "创建日期:" & eated & vbCrLf

strMsg = strMsg & "修改日期:" & stModified

vbCrLf MsgBox strMsg, , "文件信息"End Sub

&

FileInfo过程首先使用CreateObject函数创建一个FileSystemObject对象,用来访

问计算机的文件系统。然后,使用GetFile方法创建一个File对象并返回对文

件的引用。接着,利用File对象的Name属性、Drive属性、DateCreated属性、

DateLastModified属性返回文件的相应信息。

下面详细介绍FileSystemObject对象的方法和属性。

BuildPath方法

其语法为:

ath (Path,Name)

其中,oFileSysObj为任何能够返回FileSystemObject对象的对象变量。参数Path

必需,指定驱动器或文件夹路径,String类型,可以是绝对路径也可以是相对路径,不一

定要包含驱动器名。参数Name必需,指定附加在Path后的文件夹或文件路径,String

类型。参数Path或Name都不一定要求是当前已经存在的路径或文件夹。

BuildPath方法通过合并参数Path和文件夹或文件名生成一个字符串,并且在必要的

地方加上正确的主机系统路径分隔符。该方法不能检验新的文件夹或文件名的有效性。

与人工合并两个字符串相比,使用BuildPath函数的惟一好处就是它能够选择正确的

路径分隔符。

FileExists方法