VBS基础篇 - FileSystemObject对象
来源:互联网 发布:淘宝钻石展位收费模式 编辑:程序博客网 时间:2024/05/21 11:22
文件系统是所有操作系统最重要的部分之一,脚本经常会需要对文件及文件夹进行访问和管理,在Vbs中对桌面和文件系统进行访问的顶级对象是FileSystemObject
FSO包含的常见对象有:
对象/集合
描述
Drive
包含储存设备的信息,包括硬盘、光驱、ram盘、网络驱动器
Drives
提供一个物理和逻辑驱动器的列表
File
检查和处理文件
Files
提供包含在文件夹内的所有文件的列表
Folder
检查和处理文件夹
Folders
提供在 Folder 内的所有文件夹的列表
TextStream
对象。用来读写文本文件。
用FSO对象模型来编程,使用CreateObject方法来创建FileSystemObject对象,例如: Dim fsoSet fso = wscript.createobject("scripting.filesystemobject")在这个示例中,Scripting 是类型库的名字,而 FileSystemObject 则是想要创建的对象的名字。至此我们获取了fso对象,接下来就可以使用fso对象了。如果要释放的话也很简单,例如: Set fso = nothingFileSystemObject对象总共一个属性即Drives描述:获得所有可用驱动器的集合。说明:无论是否本地磁盘、插入媒体、可移动媒体驱动器都显示在 Drives 集合中。 具体示例代码如下所示:获取本计算机上所有的磁盘的盘符 Set fso = CreateObject("Scripting.FileSystemObject")Set Drivers = fso.DrivesFor Each Driver in Drivers Msgbox Driver.DriveLetter '输出计算机上所有的磁盘盘符Next 方法:(仅常用的方法)CreateFile描述:创建一个空文件语法:object. CreateTextFile(strFile,blnOverWrite)参数:strFile为文件名称 blnOverWrite为Ture强制覆盖,为False不覆盖示例:创建文件C:\test.txt Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用CreateTextFile创建文件,不覆盖存在的文件Fso.CreateTextFile "C:\test.txt",False'覆盖存在的文件Fso.CreateTextFile "C:\test.txt",TrueCreateFolder描述:创建一个空的文件夹语法:object. CreateFolder(strFolder)参数:strFolder为想要创建的文件夹名称示例:创建文件夹: c:\testDim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用MyFolder创建文件夹Fso.CreateFolder("c:\test")DeleteFile描述:删除一个文件语法:object. DeleteFile (strFile,force)参数:strFile为想要删除的文件。组成部分中可用通配符。 force如果要删除只读文件,则该值为 True;否则为 False(默认)示例:删除文件: c:\test.txt Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用DeleteFile删除指定文件Fso.DeleteFile("c:\test.txt")'强制删除只读的文件Fso.DeleteFile "c:\test.txt",TrueDeleteFolder描述:删除一个文件夹语法:object. DeleteFolder(strFolder,force)参数:strFolder为想要删除的文件夹名称。组成部分中可用通配符。 force如果要删除只读文件夹,则该值为 True;否则为 False(默认) 示例:删除文件夹: c:\testDim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用DeleteFile删除指定文件Fso.DeleteFolder("c:\test")'强制删除只读的文件Fso.DeleteFolder "c:\test",TrueFileExists描述:判断指定文件是否存在语法:object. FileExists (strFile)参数:strFile为指定的文件示例:检查文件: c:\test.txt是否存在 Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用FileExists判断指定文件是否存在MsgBox Fso.FileExists("c:\test.txt")FolderExist描述:判断指定文件夹是否存在语法:object. FolderExists (strFolder)参数:strFolder为指定的文件夹示例:检查文件夹: c:\test是否存在 Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用FolderExists判断指定文件夹是否存在MsgBox Fso.FolderExists("c:\test")CopyFile描述:将一个或多个文件从某位置复制到另一位置语法:object.CopyFile "source", "destination"[, overwrite]参数:source必选项。表示指定文件的路径。组成部分中可用通配符。 destination必选项。表示目标位置路径 overwrite可选项。Boolean 值表明是否覆盖现有文件。如果是 True,则覆盖文件;如果是 False,则不覆盖现有文件。默认值是 True 示例:将 c:\test.txt文件复制到D:\下 Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用CopyFile复制文件到另一个位置,False不覆盖已存在文件Fso.CopyFile "c:\test.txt","D:\",False'True覆盖已存在文件Fso.CopyFile "c:\test.txt","D:\",True示例:将 c:\下所有的txt文件复制到D:\下Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用*.txt,可以同时将多个文件复制到另一个位置,False不覆盖已存在文件Fso.CopyFile "c:\*.txt","D:\",False'True表示覆盖已存在文件Fso.CopyFile "c:\*.txt","D:\",TrueCopyFolder描述:将文件夹从某位置复制到另一位置语法:object. CopyFolder "source", "destination"[, overwrite]参数:source必选项。表示指定文件夹的路径。组成部分中可用通配符。 destination必选项。表示目标位置的路径 overwrite可选项。Boolean 值表明是否覆盖现有文件夹。 如果是 True,则覆盖文件夹;如果是 False,则不覆盖现有文件夹。默认值是 True示例:将 c:\test文件夹复制到D:\下 Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用CopyFile复制文件到另一个位置,默认为True覆盖已存在文件Fso.CopyFolder "c:\test","D:\"'False不覆盖已存在文件Fso.CopyFolder "c:\test","D:\",FalseMoveFile描述:将一个或多个文件从某位置移动到另一位置语法:object.MoveFile source, destination参数:source必选项。要移动的文件的路径。组成部分中可用通配符。 destination必选项。指定路径,表示要将文件移动到该目标位置。 destination 参数不能包含通配符。示例:将 c:\test文件夹移动到D:\下Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用MoveFile移动文件到另一个位置Fso.MoveFile "c:\test.txt","D:\"MoveFolder描述:将一个或多个文件夹从某位置移动到另一位置语法:object.MoveFolder source, destination参数:source必选项。要移动的文件夹的路径。组成部分中可用通配符。 destination必选项。指定路径,表示要将文件夹移动到该目标位置。示例: Dim Fso'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用MoveFolder移动文件夹到另一个位置Fso.MoveFolder "c:\test","D:\"GetExtensionName描述:获取文件后缀名语法:object.MoveFolder source, destination参数:source必选项。要移动的文件夹的路径。组成部分中可用通配符。 destination必选项。指定路径,表示要将文件夹移动到该目标位置。示例:获取”c:\test.txt”文件后缀名 Dim FsoDim GetExtensionName'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用GetExtensionName获取文件后缀名GetExtensionName = fso.GetExtensionName("c:\test.txt")MsgBox GetExtensionName '输出txtGetBaseName描述:获取文件当前所在文件夹语法:object.GetBaseName Path参数:Path必选项。文件路径名。示例:获取”c:\test.txt”文件名称 Dim FsoDim GetBaseName'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用GetBaseName获取文件的文件名称GetBaseName = Fso.GetBaseName("c:\test\test.txt")MsgBox GetBaseName '输出testGetParentFolderName描述:将一个或多个文件夹从某位置移动到另一位置语法:object.GetParentFolderName Path参数:Path必选项。文件路径名。示例:获取”c:\test.txt”文件所在的文件夹Dim FsoDim GetParentFolderName'创建FileSystemObject对象Set Fso = CreateObject("Scripting.FileSystemObject")'使用GetParentFolderName获取文件当前所在的文件夹GetParentFolderName = Fso.GetParentFolderName("c:\test\test.txt")MsgBox GetParentFolderName '输出c:\test
0 0
- VBS基础篇 - FileSystemObject对象
- VBS基础篇 - 对象(3) - FileSystemObject对象
- VBS基础篇 - 对象(3) - FileSystemObject对象
- VBS---FileSystemObject对象
- VBS中FileSystemObject对象详解
- VBS中FileSystemObject对象详解
- VBS基础篇 - Dictionary对象
- VBS基础篇 - Err对象
- VBS基础篇 - RegExp 对象
- VBS基础篇 - wscript 对象
- VBS基础篇 - 对象 - Err对象
- VBS基础篇 - 对象(1) - Class对象
- VBS基础篇 - 对象(2) - Dictionary对象
- VBS基础篇 - 对象(4) - Drive对象
- VBS基础篇 - 对象(5) - File对象
- VBS基础篇 - 对象(6) - Folder对象
- VBS基础篇 - 对象(7) - TextStream对象
- VBS基础篇 - 对象(8) - Err对象
- VBS基础篇 - 队列
- 善于抓住80后消费者的消费心理
- VBS基础篇 - 堆栈
- C++ —— C++三大分支结构(顺序、选择、循环)
- 40个多线程问题总结
- VBS基础篇 - FileSystemObject对象
- 第五周--建立链栈算法库
- VBS基础篇 - Err对象
- Android Intent设置类型setType();
- 第五周项目8,键入数字N进行判断
- VBS基础篇 - RegExp 对象
- VBS基础篇 - wscript 对象
- Linux 命令(文件和目录管理 - tree)
- VBS基础篇 - 常用函数