第12章 Visual Basic 6.0的文件系统.pptVIP

第12章 Visual Basic 6.0的文件系统 在前一章已经介绍了VB的输入输出机制，在这一章介绍一下VB的文件系统。在VB编程中经常需要和文件系统打交道，例如创建、改变、移动和删除文件夹或者文件，或者检测是否存在指定的文件夹或者文件，获取磁盘可用空间等。在VB推出文件系统对象(File System Object)以前，完成这些功能需要调用Windows API函数或者使用一些比较复杂的过程来实现，使编程复杂、可靠性差又容易出错。使用Windows提供的的文件系统对象，一切变得简单多明了。 12.1 FSO模型 利用File System Object（FSO）对象模型，程序员能够对文件夹进行创建、改变、移动和删除等操作，或者是检测某一文件夹是否存在，获得文件夹的相关信息等操作。 12.1.1 FSO简介 Visual Basic 6.0的一个重要功能就是提供了File System Object(FSO)对象模型，提供了一个基于对象的工具来处理磁盘、文件夹和文件。这样，用户就可以使用带有一整套属性、方法和事件的object.method语法来处理磁盘、文件夹和文件了，比传统的Visual Basic语句和命令的处理方法要简单明了。 FSO对象模型的主要功能有以下几个方面。 获取系统驱动器的信息。 获取文件夹的信息和对文件夹的操作。 获取文件的信息和对文件的操作。 12.1.2 Visual Basic 6.0的文件系统对象 Visual Basic 6.0的文件系统对象主要包括下面这些对象。 Drive对象： Folder对象： File对象： 12.2 FSO对象模型编程 File System Object对象模型包含在Scripting的类型库中，此类型库位于Scrrun.Dll文件中。引用些文件的详细方法见12.1介绍。File System Object对象编程主要包括三个步骤： （1）创建一个新的File System Object对象。 （2）选择适当的方法。 （3）访问该对象的相关属性。 12.2.1 创建FSO对象 创建一个新的File System Object对象主要有以下两种方法。 声明一个File System Object对象类型变量。如下面程序所示 Dim MyFso As New FileSystemObject 使用CreateObject方法创建一个File System Object对象。如下面程序所示 Dim MyFso1 As FileSystemObject Set MyFso1 = CreateObject(Scripting.FileSystemObject) 在上述创建方法中，第一种方法只在Visual Basic中有效，而后一种方法在Visual Basic和VBScript中都有效。 12.2.2 选择FSO方法 创建了File System Object对象后，接下来就应该选择对该对象适当的方法。例如，建立一个新的对象可以使用Create Folder方法或者Create Text File方法；删除对象可以使用Delete Folder方法或者Delete File方法，也可以用File和Folder对象的Delete方法。使用适当的方法，还可以对文件和文件夹进行复制和移动等操作。 12.2.3 访问驱动器、文件和文件夹 如果要访问的驱动器、文件和文件夹是通过Create Folder方法或者create Text File方法创建的，就没有必要使用File System Object对象中相应的方法来访问对象的属性，只要能过创建对象时的变量就可以访问相应的对象属性了。如下面程序所示 Private Sub Command1_Click() 定义一个FileSystemObject对象 Dim MyFso As New FileSystemObject 定义一个Folder变量 Dim myFolder As Folder 创建一个Folder对象 Set myFolder = MyFso.CreateFolder(c:\myfolder) MsgBox New Folder: myFolder.Name End Sub 12.2.4 访问对象的属性 要访问对象的属性，就要获得对象的句柄。例如，要想获得一个特定文件的大小。第一步要先创建对象的一个实例。 Dim MyFso as New FileSystemObject Dim MyFile as File 第二步是通过适当的方法得到其句柄。 Set MyFile=MyFso.GetFile(“c:\myfile.txt”) 第三