用FSO对象模型来编程，使用CreateObject方法来创建FileSystemObject对象，例如：
Dim fso
Set fso = wscript.createobject("scripting.filesystemobject")
在这个示例中，Scripting 是类型库的名字，而 FileSystemObject 则是想要创建的对象的名字。至此我们获取了fso对象，接下来就可以使用fso对象了。如果要释放的话也很简单，例如：
Set fso = nothing
FileSystemObject对象总共一个属性即Drives
描述：获得所有可用驱动器的集合。
说明：无论是否本地磁盘、插入媒体、可移动媒体驱动器都显示在 Drives 集合中。
具体示例代码如下所示：获取本计算机上所有的磁盘的盘符
| 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
| 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
| 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
| 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
| Dim Fso '创建FileSystemObject对象 Set Fso = CreateObject("Scripting.FileSystemObject") '使用DeleteFile删除指定文件 Fso.DeleteFolder("c:test") '强制删除只读的文件 Fso.DeleteFolder "c:test",True |
