filesystemobject文件管理系统兰

《filesystemobject文件管理系统兰》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、FileSystemObject文件管理系统兰FileSystemObject文件管理系统要创建FSO对象可以采用两种方法，一种是将一个变量声明为FSO对象类型：DimfsoTestAsNewFileSystemObject；另一种是通过CreateObject方法创建一个FSO对象：SetfsoTest=CreateObject("Scripting.FileSystemObject")。在实际使用中具体采用哪种声明方法，可根据个人的使用习惯而定。完成了FSO对象模型的创建之后，就可以利用创建

2、的对象模型的方法访问下属各个对象的属性来获取所需信息或进行相关操作了，具体的方法在下面结合各个对象分别讲述。(二)Drive对象上面已经提到Drive对象是用来获取当前系统中各个驱动器的信息的。由于Drive对象没有方法，其应用都是通过属性表现出来的，所以我们必须熟悉Drive对象的属性：AvailableSpace：返回在指定的驱动器或网络共享上的用户可用的空间容量。DriveLetter：返回某个指定本地驱动器或网络驱动器的字母，这个属性是只读的。DriveType：返回指定驱动器的磁盘类型

3、。FileSystem：返回指定驱动器使用的文件系统类型。FreeSpace：返回指定驱动器上或共享驱动器可用的磁盘空间，这个属性是只读的。IsReady：确定指定的驱动器是否准备好。Path：返回指定文件、文件夹、或驱动器的路径。RootFolder：返回一个Folder对象，该对象表示一个指定驱动器的根文件夹。只读属性。SerialNumber：返回用于唯一标识磁盘卷标的十进制序列号。ShareName：返回指定驱动器的网络共享名TotalSize：以字节为单位，返回驱动器或网络共享的总空间

4、大小。VolumeName：设置或返回指定驱动器的卷标名。从上面的属性可以看到Drive对象基本上包含了日常操作所需的全部的驱动器信息，因此在使用中是非常方便的。下面通过一个实例讲述Drive对象的使用。首先在VB中建立一个工程，然后添加一个命令按钮，将其Caption设置为"TestDrive"，然后在click事件中加入以下代码：DimfsoTestAsNewFileSystemObjectDimdrv1AsDrive,sReturnAsStringSetdrv1=fsoTest.GetDr

5、ive("C：")sReturn="Drive"&"C："&vbCrLfsReturn=sReturn&"VolumeName"&drv1.VolumeName&vbCrLfsReturn=sReturn&"TotalSpace："&FormatNumber(drv1.TotalSize/1024,0)sReturn=sReturn&"Kb"&vbCrLfsReturn=sReturn&"FreeSpace："&FormatNumber(drv1.FreeSpace/1024,0)sRetu

6、rn=sReturn&"Kb"&vbCrLfsReturn=sReturn&"FileSystem："&drv1.FileSystem&vbCrLfMsgBoxsReturn其中GetDrive方法返回一个与指定路径中的驱动器相对应的Drive对象。该方法的语法格式为object.GetDrivedrivespec，object是一个FSO对象的名称，drivespec用于指定驱动器的名称。(三)Folder对象在FSO对象模型中，提供了丰富的有关文件夹操作的方法，这些方法分别是：FileSys

7、temObject对象有关文件夹的方法：CreateFolder：创建一个文件夹。DeleteFolder：删除一个文件夹。MoveFolder：移动一个文件夹。CopyFolder：复制一个文件夹。FolderExists：查找一个文件夹是否在驱动器上。GetFolder：获得已有Folder对象的一个实例。GetParentFolderName：找出一个文件夹的父文件夹的名称。GetSpecialFolder：找出系统文件夹的路径。Folder对象的方法：Delete：创建一个文件夹。Mov

8、e：移动一个文件夹。Copy：复制一个文件夹。Name：检索文件夹的名称。在此需要强调一点，前面我们曾经提到过FSO对象模型包含的方法是冗余的，所以Folder对象的Delete、Move、Copy方法和FileSystemObject对象的DeleteFolder、MoveFolder、CopyFolder方法实际上是相同的，因此在实际使用中可以任选其中的一种。和Drive对象一样，下面通过实例演示Folder对象的应用。在VB下新建一个工程，然后在上面添加三个命令按钮，然后在Form1的通用