VBS基础篇 - 对象(3) - FileSystemObject对象

VBS基础篇 - 对象(3) - FileSystemObject对象

　　文件系统是所有操作系统最重要的部分之一，脚本经常会需要对文件及文件夹进行访问和管理，在Vbs中对桌面和文件系统进行访问的顶级对象是FileSystemObject(FSO)，这个对象特别复杂，是vbs进行文件操作的核心。

FSO包含的常见对象有：

             


对象/集合
描述

Drive
包含储存设备的信息，包括硬盘、光驱、ram盘、网络驱动器

Drives
提供一个物理和逻辑驱动器的列表

File
检查和处理文件

Files
提供包含在文件夹内的所有文件的列表

Folder
检查和处理文件夹

Folders
提供在 Folder 内的所有文件夹的列表

TextStream
对象。用来读写文本文件。

       如何使用FSO

要用FSO对象模型来编程，使用CreateObject方法来创建FileSystemObject对象，例如：　　


1

2

Dim fso

Set fso = wscript.createobject("scripting.filesystemobject")

在这个示例中，Scripting 是类型库的名字，而 FileSystemObject 则是想要创建的对象的名字。至此我们获取了fso对象，接下来就可以使用fso对象了。如果要释放的话也很简单，例如：


1

Set fso = nothing

FileSystemObject对象总共一个属性即Drives

描述：获得所有可用驱动器的集合。

说明：无论是否本地磁盘、插入媒体、可移动媒体驱动器都显示在 Drives 集合中。

具体示例代码如下所示：获取本计算机上所有的磁盘的盘符　　


1

2

3

4

5

Set fso = CreateObject("Scripting.FileSystemObject")

Set Drivers = fso.Drives

For Each Driver in Drivers

    Msgbox Driver.DriveLetter ‘输出计算机上所有的磁盘盘符

Next

　　方法：(仅常用的方法)

　　CreateFile

       描述：创建一个空文件

语法：object. CreateTextFile(strFile,blnOverWrite)

参数：strFile为文件名称

blnOverWrite为Ture强制覆盖，为False不覆盖

示例：创建文件C:\test.txt


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用CreateTextFile创建文件,不覆盖存在的文件

Fso.CreateTextFile "C:\test.txt",False

‘覆盖存在的文件

Fso.CreateTextFile "C:\test.txt",True

　　CreateFolder

       描述：创建一个空的文件夹

语法：object. CreateFolder(strFolder)

参数：strFolder为想要创建的文件夹名称

示例：创建文件夹: c:\test


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MyFolder创建文件夹

Fso.CreateFolder("c:\test")

　　DeleteFile

       描述：删除一个文件

语法：object. DeleteFile (strFile，force)

参数：strFile为想要删除的文件。组成部分中可用通配符。

force如果要删除只读文件，则该值为 True；否则为 False（默认）

示例：删除文件： c:\test.txt 　　


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用DeleteFile删除指定文件

Fso.DeleteFile("c:\test.txt")

‘强制删除只读的文件

Fso.DeleteFile "c:\test.txt",True

　　DeleteFolder

       描述：删除一个文件夹

语法：object. DeleteFolder(strFolder，force)

参数：strFolder为想要删除的文件夹名称。组成部分中可用通配符。

force如果要删除只读文件夹，则该值为 True；否则为 False（默认）

示例：删除文件夹： c:\test


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用DeleteFile删除指定文件

Fso.DeleteFolder("c:\test")

‘强制删除只读的文件

Fso.DeleteFolder "c:\test",True

　　FileExists

       描述：判断指定文件是否存在

语法：object. FileExists (strFile)

参数：strFile为指定的文件

示例：检查文件： c:\test.txt是否存在


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用FileExists判断指定文件是否存在

MsgBox Fso.FileExists("c:\test.txt")

　　FolderExist

       描述：判断指定文件夹是否存在

语法：object. FolderExists (strFolder)

参数：strFolder为指定的文件夹

示例：检查文件夹： c:\test是否存在


1

2

3

4

5

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:\下


1

2

3

4

5

6

7

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:\下


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用*.txt,可以同时将多个文件复制到另一个位置,False不覆盖已存在文件

Fso.CopyFile "c:\*.txt","D:\",False

‘True表示覆盖已存在文件

Fso.CopyFile "c:\*.txt","D:\",True

　　CopyFolder

       描述：将文件夹从某位置复制到另一位置

语法：object. CopyFolder "source", "destination"[, overwrite]

参数：source必选项。表示指定文件夹的路径。组成部分中可用通配符。

destination必选项。表示目标位置的路径

overwrite可选项。Boolean 值表明是否覆盖现有文件夹。如果是 True，则覆盖文件夹；如果是 False，则不覆盖现有文件夹。默认值是 True

示例：将 c:\test文件夹复制到D:\下    


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用CopyFile复制文件到另一个位置,默认为True覆盖已存在文件

Fso.CopyFolder "c:\test","D:\"

‘False不覆盖已存在文件

Fso.CopyFolder "c:\test","D:\",False

　　MoveFile

描述：将一个或多个文件从某位置移动到另一位置

语法：object.MoveFile source, destination

参数：source必选项。要移动的文件的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件移动到该目标位置。destination 参数不能包含通配符。

示例：将 c:\test文件夹移动到D:\下


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MoveFile移动文件到另一个位置

Fso.MoveFile "c:\test.txt","D:\"

　　MoveFolder

描述：将一个或多个文件夹从某位置移动到另一位置

语法：object.MoveFolder source, destination

参数：source必选项。要移动的文件夹的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件夹移动到该目标位置。

示例：


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MoveFolder移动文件夹到另一个位置

Fso.MoveFolder "c:\test","D:\"

　　GetExtensionName

描述：获取文件后缀名

语法：object.MoveFolder source, destination

参数：source必选项。要移动的文件夹的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件夹移动到该目标位置。

示例：获取”c:\test.txt”文件后缀名


1

2

3

4

5

6

7

Dim Fso

Dim GetExtensionName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetExtensionName获取文件后缀名

GetExtensionName = fso.GetExtensionName("c:\test.txt")

MsgBox GetExtensionName ‘输出txt

　　GetBaseName

描述：获取文件当前所在文件夹

语法：object.GetBaseName Path

参数：Path必选项。文件路径名。

示例：获取”c:\test.txt”文件名称


1

2

3

4

5

6

7

Dim Fso

Dim GetBaseName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetBaseName获取文件的文件名称

GetBaseName = Fso.GetBaseName("c:\test\test.txt")

MsgBox GetBaseName ‘输出test

　　GetParentFolderName

描述：将一个或多个文件夹从某位置移动到另一位置

语法：object.GetParentFolderName Path

参数：Path必选项。文件路径名。

示例：获取”c:\test.txt”文件所在的文件夹


1

2

3

4

5

6

7

Dim Fso

Dim GetParentFolderName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetParentFolderName获取文件当前所在的文件夹

GetParentFolderName = Fso.GetParentFolderName("c:\test\test.txt")

MsgBox GetParentFolderName ‘输出c:\test

VBS基础篇 - 对象(3) - FileSystemObject对象

　　文件系统是所有操作系统最重要的部分之一，脚本经常会需要对文件及文件夹进行访问和管理，在Vbs中对桌面和文件系统进行访问的顶级对象是FileSystemObject(FSO)，这个对象特别复杂，是vbs进行文件操作的核心。

FSO包含的常见对象有：

             


对象/集合
描述

Drive
包含储存设备的信息，包括硬盘、光驱、ram盘、网络驱动器

Drives
提供一个物理和逻辑驱动器的列表

File
检查和处理文件

Files
提供包含在文件夹内的所有文件的列表

Folder
检查和处理文件夹

Folders
提供在 Folder 内的所有文件夹的列表

TextStream
对象。用来读写文本文件。

       如何使用FSO

要用FSO对象模型来编程，使用CreateObject方法来创建FileSystemObject对象，例如：　　


1

2

Dim fso

Set fso = wscript.createobject("scripting.filesystemobject")

在这个示例中，Scripting 是类型库的名字，而 FileSystemObject 则是想要创建的对象的名字。至此我们获取了fso对象，接下来就可以使用fso对象了。如果要释放的话也很简单，例如：


1

Set fso = nothing

FileSystemObject对象总共一个属性即Drives

描述：获得所有可用驱动器的集合。

说明：无论是否本地磁盘、插入媒体、可移动媒体驱动器都显示在 Drives 集合中。

具体示例代码如下所示：获取本计算机上所有的磁盘的盘符　　


1

2

3

4

5

Set fso = CreateObject("Scripting.FileSystemObject")

Set Drivers = fso.Drives

For Each Driver in Drivers

    Msgbox Driver.DriveLetter ‘输出计算机上所有的磁盘盘符

Next

　　方法：(仅常用的方法)

　　CreateFile

       描述：创建一个空文件

语法：object. CreateTextFile(strFile,blnOverWrite)

参数：strFile为文件名称

blnOverWrite为Ture强制覆盖，为False不覆盖

示例：创建文件C:\test.txt


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用CreateTextFile创建文件,不覆盖存在的文件

Fso.CreateTextFile "C:\test.txt",False

‘覆盖存在的文件

Fso.CreateTextFile "C:\test.txt",True

　　CreateFolder

       描述：创建一个空的文件夹

语法：object. CreateFolder(strFolder)

参数：strFolder为想要创建的文件夹名称

示例：创建文件夹: c:\test


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MyFolder创建文件夹

Fso.CreateFolder("c:\test")

　　DeleteFile

       描述：删除一个文件

语法：object. DeleteFile (strFile，force)

参数：strFile为想要删除的文件。组成部分中可用通配符。

force如果要删除只读文件，则该值为 True；否则为 False（默认）

示例：删除文件： c:\test.txt 　　


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用DeleteFile删除指定文件

Fso.DeleteFile("c:\test.txt")

‘强制删除只读的文件

Fso.DeleteFile "c:\test.txt",True

　　DeleteFolder

       描述：删除一个文件夹

语法：object. DeleteFolder(strFolder，force)

参数：strFolder为想要删除的文件夹名称。组成部分中可用通配符。

force如果要删除只读文件夹，则该值为 True；否则为 False（默认）

示例：删除文件夹： c:\test


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用DeleteFile删除指定文件

Fso.DeleteFolder("c:\test")

‘强制删除只读的文件

Fso.DeleteFolder "c:\test",True

　　FileExists

       描述：判断指定文件是否存在

语法：object. FileExists (strFile)

参数：strFile为指定的文件

示例：检查文件： c:\test.txt是否存在


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用FileExists判断指定文件是否存在

MsgBox Fso.FileExists("c:\test.txt")

　　FolderExist

       描述：判断指定文件夹是否存在

语法：object. FolderExists (strFolder)

参数：strFolder为指定的文件夹

示例：检查文件夹： c:\test是否存在


1

2

3

4

5

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:\下


1

2

3

4

5

6

7

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:\下


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用*.txt,可以同时将多个文件复制到另一个位置,False不覆盖已存在文件

Fso.CopyFile "c:\*.txt","D:\",False

‘True表示覆盖已存在文件

Fso.CopyFile "c:\*.txt","D:\",True

　　CopyFolder

       描述：将文件夹从某位置复制到另一位置

语法：object. CopyFolder "source", "destination"[, overwrite]

参数：source必选项。表示指定文件夹的路径。组成部分中可用通配符。

destination必选项。表示目标位置的路径

overwrite可选项。Boolean 值表明是否覆盖现有文件夹。如果是 True，则覆盖文件夹；如果是 False，则不覆盖现有文件夹。默认值是 True

示例：将 c:\test文件夹复制到D:\下    


1

2

3

4

5

6

7

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用CopyFile复制文件到另一个位置,默认为True覆盖已存在文件

Fso.CopyFolder "c:\test","D:\"

‘False不覆盖已存在文件

Fso.CopyFolder "c:\test","D:\",False

　　MoveFile

描述：将一个或多个文件从某位置移动到另一位置

语法：object.MoveFile source, destination

参数：source必选项。要移动的文件的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件移动到该目标位置。destination 参数不能包含通配符。

示例：将 c:\test文件夹移动到D:\下


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MoveFile移动文件到另一个位置

Fso.MoveFile "c:\test.txt","D:\"

　　MoveFolder

描述：将一个或多个文件夹从某位置移动到另一位置

语法：object.MoveFolder source, destination

参数：source必选项。要移动的文件夹的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件夹移动到该目标位置。

示例：


1

2

3

4

5

Dim Fso

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用MoveFolder移动文件夹到另一个位置

Fso.MoveFolder "c:\test","D:\"

　　GetExtensionName

描述：获取文件后缀名

语法：object.MoveFolder source, destination

参数：source必选项。要移动的文件夹的路径。组成部分中可用通配符。

destination必选项。指定路径，表示要将文件夹移动到该目标位置。

示例：获取”c:\test.txt”文件后缀名


1

2

3

4

5

6

7

Dim Fso

Dim GetExtensionName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetExtensionName获取文件后缀名

GetExtensionName = fso.GetExtensionName("c:\test.txt")

MsgBox GetExtensionName ‘输出txt

　　GetBaseName

描述：获取文件当前所在文件夹

语法：object.GetBaseName Path

参数：Path必选项。文件路径名。

示例：获取”c:\test.txt”文件名称


1

2

3

4

5

6

7

Dim Fso

Dim GetBaseName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetBaseName获取文件的文件名称

GetBaseName = Fso.GetBaseName("c:\test\test.txt")

MsgBox GetBaseName ‘输出test

　　GetParentFolderName

描述：将一个或多个文件夹从某位置移动到另一位置

语法：object.GetParentFolderName Path

参数：Path必选项。文件路径名。

示例：获取”c:\test.txt”文件所在的文件夹


1

2

3

4

5

6

7

Dim Fso

Dim GetParentFolderName

‘创建FileSystemObject对象

Set Fso = CreateObject("Scripting.FileSystemObject")

‘使用GetParentFolderName获取文件当前所在的文件夹

GetParentFolderName = Fso.GetParentFolderName("c:\test\test.txt")

MsgBox GetParentFolderName ‘输出c:\test

VBS基础篇 - 对象(3) - FileSystemObject对象

时间： 2024-10-17 09:41:14

VBS基础篇 - 对象(3) - FileSystemObject对象的相关文章

VBS基础篇 - 对象(6) - Folder对象

VBS基础篇 - 对象(6) - Folder对象 描述:提供对文件所有属性的访问,从FSO对象的GetFile方法获得 使用Folder对象 要用Folder对象模型来编程必须先用FSO对象的Getfolder方法获取文件的句柄 1.使用 CreateObject 方法来创建 FileSystemObject 对象 2.使用Getfolder方法获取文件夹的句柄 3.在创建的Folder对象上使用适当的方法 4.访问对象的属性 方法:(仅常用的方法) Folder对象的方法与File对象的方法

VBS基础篇 - 对象(5) - File对象

VBS基础篇 - 对象(5) - File对象 描述:提供对文件所有属性的访问,从FSO对象的GetFile方法获得. 使用File对象        要用File对象模型来编程必须先用FileSystemObject(FSO)对象的GetFile方法获取文件的句柄 1.使用 CreateObject 方法来创建 FileSystemObject 对象 2.使用GetFile方法获取文件的句柄 3.在创建的File对象上使用适当的方法 4.访问对象的属性 方法:(仅常用的方法) Copy方法 描

VBS基础篇 - 对象(1) - Class对象

VBS基础篇 - 对象(1) - Class对象 相信对JAVA有一定了解的朋友一定对类这个名词不陌生,但是大家可能没有想过在VBS中使用Class类吧,其实Class类在自动化测试中是相当常用的,对于代码量增大时,类的结构化就充分体现出了它强大的优势,下面我们就来看一下类的组成部分以及一些用法. 初始化与终结化的应用 使用Class语句可以创建一个对象,可以为它编写字段.属性及方法,它只有两个对象事件——Initialize与Terminate.首先来看一个简单的Class示例: 1 2 3

VBS基础篇 - 循环语句(4) - For Each...Next

VBS基础篇 - 循环语句(4) - For Each...Next For Each...Next 循环与 For...Next 循环类似.For Each...Next 不是将语句运行指定的次数,而是对于数组中的每个元素或对象集合中的每一项重复一组语句.这在不知道集合中元素的数目时非常有用. 语法结构如下:         1 2 3 4 5 For Each element In group     [statements]     [Exit For]     [statements]

VBS基础篇 - VBScript过程

VBS基础篇 - VBScript过程 在 VBScript 中,过程被分为两类:Sub 过程和 Function 过程. Sub过程 Sub 过程是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句.如果 Sub 过程无任何参数,则 Sub 语句必须包含空括号 ().实例代码如下: 1 2 3 4 Call GetName() '调用Sub过程 Sub GetName()     MsgBox "我是Sirrah" '输出字符串 End Sub Sub 过程可

VBS基础篇 - 循环语句(3) - For...Next

VBS基础篇 - 循环语句(3) - For...Next 指定循环次数,使用计数器重复运行语句,语法结构如下: 1 2 3 4 5 For counter = start To end [Step step]     [statements]     [Exit For]     [statements] Next 主要参数:        counter:用做循环计数器的数值变量.这个变量不能是数组元素或用户自定义类型的元素.        start:counter的初值.        

VBS基础篇 - 过程（sub 与 Function）

VBS基础篇 - 过程(sub 与 Function) 在VBscript中,有两种procedure:Sub procedure与Function procedure Sub过程:是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句.如果 Sub 过程无任何参数,则 Sub 语句必须包含空括号 (). Call GetName() '调用Sub过程 Sub GetName() MsgBox "John" '输出字符串 End Sub 'Sub 过程可以使用参数

VBS基础篇 - wscript 对象

一.wscript对象 描述:提供对 Windows 脚本宿主对象模型根对象的访问.详述:WScript 对象是 Windows 脚本宿主对象模型层次结构的根对象.它可在任何脚本文件中使用,不需要特定的声明.        WScript 对象提供对以下信息的访问命令行参数, 脚本文件的名称,宿主文件名, 宿主版本信息.         WScript 对象可用来创建对象,连接对象, 与对象断开连接, 同步事件, 以编程方式停止脚本的执行,将信息输出到默认输出设备(Windows 对话框或命令控

java基础篇---JSP内置对象详解

在JSP中为了简化用户的开发,提供了九个内置对象,这些内置对象将由容器为用户进行实例化,而用户直接使用即可,而不用像在java中那样,必须通过关键字new进行实例化对象之后才可以使用. No. 内置对象 类型 描述 1 pageContext javax.servlet.jsp.PageContext JSP的页面容器 2 request javax.servlet.http.HttpServletRequest 得到用户的请求信息 3 response javax.servlet.http.H