Excel-VBA操作文件四大方法之三 利用FileSystemObject对象来处理文件

《Excel-VBA操作文件四大方法之三 利用FileSystemObject对象来处理文件》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、----------专业最好文档，专业为你服务，急你所急，供你所需-------------文档下载最佳的地方Excel-VBA操作文件四大方法之三三、利用FileSystemObject对象来处理文件FileSystemObject对象模型，是微软提供的专门用来访问计算机文件系统的，具有大量的属性、方法和事件。其使用面向对象的“object.method”语法来处理文件夹和文件，使用起来十分方便（需Office2000以后版本）。FileSystemObject并不是VBA的一部分，它是以一个CO

2、M组件的形式提供的。因此，要使用先要创建FileSystemObject对象。FileSystemObject对象模型包含了下面的对象和集合：·FileSystemObject 主对象，包含用来创建、删除和获得有关信息，以及用来操作驱动器、文件夹和文件的方法和属性。·Drive   对象，包含用来获得信息的方法和属性，这些信息是关于连接在系统上的驱动器的，如有多少可用空间等。驱动器不一定是硬盘，也可以是CD－ROM、U盘甚至是通过网络在逻辑上连接的硬盘（如公司里部门共享的服务器网络硬盘）。·Driv

3、es  集合，提供驱动器的列表，这些驱动器以实物或在逻辑上与系统相连接。Drives集合包括所有驱动器，与类型无关。·File   对象，包含用来创建、删除或移动文件的方法和属性。·Files   集合，提供包含在文件夹内的所有文件的列表。·Folder  对象，包含用来创建、删除或移动文件夹的方法和属性。·Folders  集合，提供包含在文件夹内的所有文件夹的列表。·TextStream  对象，用来读写文本文件。（一）准备工作要使用FileSystemObject对象，先要创建它。创建File

4、SystemObject对象要使用CreatObject函数。CreateObject函数用来创建并返回一个对ActiveX对象的引用。语法：CreateObject(class,[servername])class是要创建的应用程序名称和类。servername要在其上创建对象的网络服务器名称。（如果要在远程计算机上创建对象才用）class参数使用appname.objecttype这种语法，包括以下部分：appname必需的；提供该对象的应用程序名。objecttype必需的；待创建对象的类型或

5、类。因此，我们用下面的代码创建FileSystemObject对象:DimfsoAsObjectSetfso=CreateObject("Scripting.FileSystemObject")Scripting是类型库的名称，FileSystemObject就是要创建的对象的名字。同样我们可以创建Dictionary对象如下：DimdSetd=CreateObject("Scripting.Dictionary")（二）FileSystemObject对象的方法FileSystemObject对象

6、模型中有些功能是重复的，如可用FileSystemObject对象的CpoyFile方法，也可用File对象的Copy方法来复制文件。下面先介绍FileSystemObject对象的方法。1、GetDrive方法----------专业最好文档，专业为你服务，急你所急，供你所需-------------文档下载最佳的地方----------专业最好文档，专业为你服务，急你所急，供你所需-------------文档下载最佳的地方语法：object.GetDrivedrivespecdrivespec

7、参数可以是一个驱动器字符（c）、一个驱动器字符加一个冒号（c:）、一个驱动器字符加冒号和路径分隔符（c:）或任何网络共享的说明（\computer2share1）。作用：返回一个与指定路径中的驱动器相对应的Drive对象。示例：DimdSetd=fso.GetDrive("D:")  '变量d就代表了驱动器D对象如果drivespec不符合任何一种可以接受的形式或者不存在，则发生一个错误。注意：为简洁，示例中都假定fso是已经创建的FileSystemObject对象2、GetDriveNam

8、e方法语法：object.GetDriveName(path)作用：返回一个包含指定路径的驱动器名字的字符串。示例：Debug.Printfso.GetDriveName("c:test.txt")  '立即窗口显示"c:"3、GetExtensionName方法语法：object.GetExtensionName(path)作用：返回一个包含路径中最后部件扩展名的字符串。示例：Debug.Printfso.GetExtensionName("c:test.txt