资源描述:
《vb参考资料-filesystem》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、VB参考资料-FileSystemSetfs=CreateObject("Scripting.FileSystemObject")Seta=fs.CreateTextFile("c:testfile.txt",True)a.WriteLine("Thisisatest.")a.Close在上面列出的代码中,CreateObject函数返回FileSystemObject(fs)。CreateTextFile方法接着创建文件作为一个TextStream对象(a),而WriteLine方法则向创建的文本文件中写入一行文本。Close方法
2、刷新缓冲区并关闭文件。可以用ForEach...Next结构遍及Drives集合中的成员,如下面的代码所示:SubShowDriveListDimfs,d,dc,s,nSetfs=CreateObject("Scripting.FileSystemObject")Setdc=fs.DrivesForEachdindcs=s&d.DriveLetter&"-"Ifd.DriveType=3Thenn=d.ShareNameElsen=d.VolumeNameEndIfs=s&n&vbCrLfNextMsgBoxsEndSubSubSho
3、wFileList(folderspec)Dimfs,f,f1,fc,sSetfs=CreateObject("Scripting.FileSystemObject")Setf=fs.GetFolder(folderspec)Setfc=f.FilesForEachf1infcs=s&f1.names=s&vbCrLfNextMsgBoxsEndSubobject.CopyFilesource,destination[,overwrite]source必需的。指明一个或多个要被复制文件的字符串文件说明,它可以包括通配符(*?等)。de
4、stination必需的。指明source中的一个或多个文件要被复制到的接受端的字符串,不允许有通配符。overwrite选项的。Boolean值,它表示存在的文件是否被覆盖。如果是True,文件将被覆盖;如果是False,它们不被覆盖。缺省值是True。注意如果destination具有只读属性设置,不论overwrite值如何,CopyFile都将失败。通配符只能用在source参数的最后一个路径部件。例如,你可以在下面请况使用通配符:FileSystemObject.CopyFile"c:mydocumentsletters
5、*.doc","c:tempfolder"但下面情况不能使用:FileSystemObject.CopyFile"c:mydocuments*R1???97.xls","c:tempfolder"object.CopyFoldersource,destination[,overwrite]object.CreateFolder(foldername)object.CreateTextFile(filename[,overwrite[,unicode]])下面的代码举例说明如何使用CreateTextFile方法创建和打开
6、文本文件。SubCreateAfileSetfs=CreateObject("Scripting.FileSystemObject")Seta=fs.CreateTextFile("c:testfile.txt",True)a.WriteLine("Thisisatest.")a.CloseEndSubobject.DeleteFilefilespec[,force]filespec必需的。要删除文件的名字。Filespec可以在最后的路径部件中包含通配符。force可选的。Boolean值,如果要删除具有只读属性设置的文件,其值为
7、True。如果其值为False(缺省),则不能删除具有只读属性设置的文件。object.DeleteFolderfolderspec[,force]DeleteFolder方法对文件夹中有无内容不做区别。不管指定的文件夹中是否有内容,它都被删除。object.FileExists(filespec)如果指定的文件存在,返回True,若不存在,则返回False。object.DriveExists(drivespec)object.FolderExists(folderspec)object.GetFile(filespec)返回一个和
8、指定路径中文件相对应的File对象。object.GetFolder(folderspec)返回一个和指定路径中文件夹相对应的Folder对象。object.MoveFilesource,destinationSourc