VBA文件操作系统Setfso=CreateObject(“Sripting.FileSystemObject”)Fso.CreateTe
xtFileFileName,Owerite创建一个文件Fso.CreateFolder(FolderName)创建文件夹Fso
.OpenTextFile(FileName,IOMode,Create)打开一个文件，IOMode:ForReading,For
Writing,ForAppending（奇怪:如何关闭一个文件呢？）Fso.CopyFileSource,Destinatio
n,OverWrite拷贝文件Fso.CopyFolderSource,Destination,OverWrite拷贝文件夹F
so.MoveFileSource,Destination移动文件，Destination要指定新的FullnameFso.Mo
veFolderSource,Destination移动文件夹,Destination要指定新的FullnameFso.Del
eteFileFileName,Force删除文件Fso.DeleteFolderFoldername,Force删除文件夹F
so.FolderExists(FolderName)判断文件夹是否存在，返回逻辑值Fso.FileExists(FileName
)判断文件是否存在，返回逻辑值Fso.GetFile(FileName)获取文件对象，然后可以进一步用属性、方法。方法没有FSO强
，只使用与Copy,move,delete。故建议方法还是用fso好。Fso.GetFolder(FolderName)获取文件
夹对象Fso.GetDrive(DriveName)获取驱动器对象属性描述TotalSize总空间Freesize空闲空间Dri
veLetter盘符FileSystemNTFS,FAT32IsReady就绪否？DreveType驱动器类型驱动器属性属性描述属
性描述Name名称DateCreated文件创建日期path完整路径DateLastModified文件最后修改日期Size以字节
表示的文件夹大小，e.g.fso.getfolder(“D:\test”).size/1024/1024DateLastAcce
ssed文件最后访问日期Drive获取所在的盘符Attributes获取或设置文件夹的属性信息，e.g,vbNomal,vbRea
dOnly,vbHidden,vbSystem,vbDirectory等ParentFolder文件夹的父文件夹SubFolder
s文件夹的子文件夹eg.CountFiles获取当前文件夹中的文件，是文件集合。文件夹属性属性描述属性描述Name文件名称Da
teCreated文件创建日期Path文件的完整路径DateLastModified文件最后修改日期Drive获取所在的盘符Dat
eLastAccessed文件最后访问日期Size以字节表示的文件大小ParentFolder文件的父文件夹Type文件类型Att
ributes获取或设置文件夹的属性信息文件属性文件的读写FSO模型中，TextStream对象用于对文件的读写操作。属性：A
tEndOfLine指针是否在某行末尾AtEndOfStream指针是否在文件末尾注意：对ForReading方式打开的文件有
效。Column当前字符的列号Line当前字符的行号方法：对象.Close()关闭文件对象.Read(n)从文件中读取n个
字符对象.ReadAll对象.ReadLine对象.Skipn读取时，跳过n个字符对象.SkipLine读取时，跳过下一行
内容对象.Write向文件写入字符串对象.WriteLine向文件写入一行字符串，并添
加换行符对象.WriteBlankLinesn向文件写入n空行VBA直接可以调用的函数（非FSO）Dir(Path)查找文
件，返回文件名AsStringeg.Dir(“D:\.,vbDirectory)查所有文件和文件夹,配合循环direg
.Dir(“D:\.txt”)，查所有txt文件同样可以FSO的方法来历遍所有文件，来查找。ID=Shell(FilName
[,WindowStyle])执行外部程序Eg.Shell(“calc”)启动计算器Eg.Shell(“notepad”)启动记事本 |
|
