Windows下使用脚本语言操作文件系统之五-file对象
File对象描述提供访问一个文件的所有属性方法Copy Method | Delete Method | Move Method | OpenAsTextStream Method属性Attributes Property | DateCreated Property | DateLastAccessed Property | DateLastModified Property | Drive Property |Name Property | ParentFolder Property | Path Property | ShortName Property | ShortPath Property | Size Property | Type Property语法使用FSO对象GetFile方法方法返回一个File对象，下面展示如何实例化一个文件:VBScript
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
'创建c:\testfile.txt，并写入一串字符
Set NewFile = fso.CreateTextFile("c:\testfile.txt", True)
NewFile.WriteLine("This is a test.")
NewFile.Close
'实例化testfile文件
Set MyFile = fso.GetFile("c:\testfile.txt")file对象方法介绍Copy 方法描述复制文件或文件夹语法object.Copy( destination[, overwrite] )参数
object必要参数.file对象或floder对象的名称.
destination必要参数.指定文件文件夹复制到达的位置.不允许特殊字符.
overwrite可选参数.是否覆盖已存在的文件或文件夹，默认值为True.
VBScript
Dim fso,MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
'创建c:\testfile.txt，并写入一串字符
Set NewFile = fso.CreateTextFile("c:\testfile.txt", True)
NewFile .WriteLine("This is a test.")
NewFile .Close
'复制c:\testfile.txt内容到c:\windows\desktop\test2.txt
Set MyFile = fso.GetFile("c:\testfile.txt")
MyFile.Copy ("c:\windows\desktop\test2.txt")Delete方法
描述删除一个指定的文件或文件夹语法object.Delete(force)参数
object必要参数.file对象或floder对象的名称.
force可选参数.删除只读文件或文件夹时为True，默认是False.
VBScript
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
'创建c:\testfile.txt，并写入一串字符
Set NewFile = fso.CreateTextFile("c:\testfile.txt", True)
NewFile.WriteLine("This is a test.")
NewFile.Close
'删除testfile文件
Set MyFile = fso.GetFile("c:\testfile.txt")
MyFile.Delete()Move方法描述把一个指定的文件或文件夹从一个地方移动到另一个地方语法object.Move(destination)参数
object必要参数.file对象或floder对象的名称.
destination必要参数.移动文件文件夹到达的位置.不允许特殊字符.
Move方法与FileSystemObject.MoveFile或FileSystemObject.MoveFolder功能相同.
OpenAsTextStream方法描述
打开一个特定文件返回一个TextStream对象，用来从文件读取，写入和添加信息。
语法
object.OpenAsTextStream(])
参数
object必要参数.file对象的名称.
iomode可选参数.指定I/O模式,可以是三个常量ForReading, ForWriting, 或ForAppending.
format可选参数.三个Tristate值之一，指定打开文件的格式，省略则以ASCII方式打开.
iomode参数可以设置为以下任何一项：
常量值描述
ForReading1只读方式打开文件，不能写入.
ForWriting2打开文件用来写入，如果文件重名，会覆盖靠前的那个
ForAppending8打开文件在末尾追加.
format参数可以设置为以下任何一项:
常量值描述
TristateUseDefault-2使用系统默认方式打开文件.
TristateTrue-1使用Unicode编码打开文件.
TristateFalse0使用ASCII编码打开文件.
OpenAsTextStream方法提供了与 FileSystemO对象OpenTextFile方法功能相同。但OpenAsTextStream方法可用来向一个文件写入。下面展示如何向一个文件中写入内容：VBScript
Dim fso,MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
'创建c:\testfile.txt，并写入一串字符
Set NewFile = fso.CreateTextFile("C:\Users\web\Desktop\test.file",True)
NewFile.WriteLine("This is a test.")
NewFile.Close
'将test.file文件实例化为一个TextStream对象，并设为写入模式
Set MyFile = fso.GetFile("C:\Users\web\Desktop\test.file")
Const ForWriting = 2
set objTextStream = MyFile.OpenAsTextStream(ForWriting)
'向文件中写入"Write into a file not txt"
objTextStream.WriteLine("Write into a file not txt")
objTextStream.Closefile对象属性介绍
学海无涯，回头是岸! 不知该说些什么。。。。。。就是谢谢 比我有才的都没我帅，比我帅的都没我有才！ 俺从不写措字，但俺写通假字! 人生不能像做菜、把所有的料都准备好才下锅! 没看完~~~~~~ 先顶，好同志
页:
[1]