FileSystemObject对象（简称FSO对象）提供从QTP访问文件的能力，在QTP自动化测试过程中经常使用。
FSO常用方法有：
CreatTextFile;创建文件
OpenTextFile;读取文件
Write(WriteLine);写入（带回车写入）
ReadLine;读取
FSO对象一般用CreateObject来实现
对象名.CreateTextFile(文件名（路径）,True/False,True/False)
第一个参数，必填。指定欲操作的目标文件的名称，包含路径；
第二个参数，可不填。True代表覆盖已存在的同名文件，False代表不覆盖，默认是False。需要说明的是，如果是False，当遇到同名文件时，系统会报错；
第三个参数，可不填。True代表文件采用Unicode，False采用ASCII，默认是False。
举例：
Set fso = CreateObject("Scripting.FileSystemObject")'创建一个fso对象
Set MyFile = fso.CreateTextFile("C:\test.txt", True)'建立一个C盘下名为test.txt的文件，重名则覆盖原文件
Set MyFile = fso.CreateTextFile("C:\test.txt", True)'建立一个C盘下名为test.txt的文件，重名则覆盖原文件
'以下共写入5行信息
MyFile.Write "test1"
MyFile.WriteLine "test2"
MyFile.WriteLine "test3"
MyFile.Write "test4"
MyFile.Writeblanklines (2)
MyFile.Write "test5"
Set ReadFile = fso.OpenTextFile("C:\test.txt",1)'读取刚刚建立的文件
text = ReadFile.ReadLine'读取第一行信息
Msgbox text
text = ReadFile.ReadLine'读取第二行信息
Msgbox text
text = ReadFile.ReadAll'读取剩余的三行信息
Msgbox text
MyFile.Close
Set MyFile = nothing
Set fso = nothing
MyFile.Write "test1"
MyFile.WriteLine "test2"
MyFile.WriteLine "test3"
MyFile.Write "test4"
MyFile.Writeblanklines (2)
MyFile.Write "test5"
Set ReadFile = fso.OpenTextFile("C:\test.txt",1)'读取刚刚建立的文件
text = ReadFile.ReadLine'读取第一行信息
Msgbox text
text = ReadFile.ReadLine'读取第二行信息
Msgbox text
text = ReadFile.ReadAll'读取剩余的三行信息
Msgbox text
MyFile.Close
Set MyFile = nothing
Set fso = nothing
需要注意的是，读取文件内容时，是从文件的第一行进行操作的，当读取到最后一行后再执行读取操作系统会报错，可以试试把text = ReadFile.ReadAll放在第一次读取时来看看效果。
FSO对象功能很多，还可以对文件夹、目录、属性等进行操作，有兴趣可以在QTP的帮助中查找。
