六、输入函数:InputBox(提示[,标题][,默认][,x位置][,位置][,helpfile,context])
prompt 字符串表达式,作为消息显示在对话框中。如果 prompt 中包含多个行,则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 以分隔各行。
Title 显示在对话框标题栏中的字符串表达式。如果省略 title,则应用程序的名称将显示在标题栏中。
Default 显示在文本框中的字符串表达式,在没有其它输入时作为默认的响应值。如果省略 default,则文本框为空。
Xpos 数值表达式,用于指定对话框的左边缘与屏幕左边缘的水平距离(单位为缇)。如果省略 xpos,则对话框会在水平方向居中。
Ypos 数值表达式,用于指定对话框的上边缘与屏幕上边缘的垂直距离(单位为缇)。如果省略 ypos,则对话框显示在屏幕垂直方向距下边缘大约三分之一处。
Helpfile 字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile,则必须提供 context。
Context 数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context,则必须提供 helpfile。
如果同时提供了 helpfile 和 context,就会在对话框中自动添加“帮助”按钮。
如果用户单击确定或按下 ENTER,则 InputBox 函数返回文本框中的内容。如果用户单击取消,则函数返回一个零长度字符串 ("")。
输出函数:MsgBox(提示[, 按钮类型(数字)][, 标题][, helpfile, context])
参数
prompt 作为消息显示在对话框中的字符串表达式。如果 prompt 中包含多个行,则可在各行之间用回车(Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。
Buttons 数值表达式,是表示指定显示按钮的数目和类型、使用的图标样式,默认按钮的标识以及消息框样式的数值的总和。有关数值,请参阅“设置”部分。如果省略,则 buttons 的默认值为 0。
Title 显示在对话框标题栏中的字符串表达式。如果省略 title,则将应用程序的名称显示在标题栏中。
Helpfile 字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile,则必须提供 context。在 16 位系统平台上不可用。
Context 数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context,则必须提供 helpfile。在 16 位系统平台上不可用。
一、FileSystemObject 对象-对应的方法
综述:Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:/testfile.txt", Tr)
MyFile.WriteLine("This is a test.")
MyFile.Close
CreateObject 函数返回 FileSystemObject 对象 (fso)。CreateTextFile 方法创建一个文件作为 TextStream 对象 (a),然后 WriteLine 方法在此文件中写入一行文本。最后 Close 方法刷新缓冲区并关闭文件。
1:BuildPath 方法 向现有路径后添加名称。
object.BuildPath(path, name)
object必选项。应为 FileSystemObject 对象的名称。
path必选项。要附加 name 的现有路径。可以是绝对或相对路径且无需指定现有文件夹。
name必选项。要附加到现有 path 的名称。
例子:Dim fso, newpath
Set fso = CreateObject("Scripting.FileSystemObject")
path="c:/program files"
newpath = fso.BuildPath(path, "microsoft")
GetBuildPath = newpath
msgbox GetBuildPath
将会显示c:/program files/microsoft
2:CopyFile 方法 将一个或多个文件从某位置复制到另一位置。
object.CopyFile "source", "destination"[, overwrite]
object必选项。应为 FileSystemObject 对象的名称。
source必选项。表示指定文件的字符串。要复制一个或多个文件时,文件名中可以有通配符。
destination必选项。表示目标位置的字符串,从 source 复制文件到该位置。不允许用通配符。
overwrite可选项。Boolean 值表明是否覆盖现有文件。如果是 Tr,则覆盖文件;如果是 False,则不覆盖现有文件。默认值是 Tr。要注意,无论 overwrite 设置为何值,只要设置 destination 为只读属性,CopyFile 操作就无法完成。
例子:Dim fso, newpath
Set fso = CreateObject("Scripting.FileSystemObject")
fso.copyfile "c:/test.txt","d:/a.txt"
将会复制那个文本文档到d盘,并且会改名称,如果指定目标为"d:/"就会不改名称。
3:CopyFolder 方法 将文件夹从某位置递归复制到另一位置。
object.CopyFolder source, destination[, overwrite]
object必选项。应为 FileSystemObject 对象的名称。
source必选项。表示指定文件夹的字符串。要复制一个或多个文件夹时,可使用通配符。
destination必选项。表示目标位置的字符串,复制 source 文件夹或子文件夹到该位置。不允许用通配符。
overwrite可选项。Boolean 值表明是否覆盖现有文件夹。如果为 Tr,则覆盖文件;如果为 False,则不覆盖文件。默认值是 Tr。
例子:Dim fso, newpath
Set fso = CreateObject("Scripting.FileSystemObject")
fso.copyfolder "c:/test","d:/"
4:CreateFolder 方法 创建文件夹。
object.CreateFolder(foldername)
object必选项。应为 FileSystemObject 对象的名称。
foldername必选项。字符串表达式,指明要创建的文件夹。
例子:Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateFolder("c:/New Folder")
此方法有返回值
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateFolder("c:/New Folder")
CreateFolderDemo = f.Path
msgbox f
将会显示c:/New Folder
5:CreateTextFile 方法 创建指定文件并返回 TextStream 对象,该对象可用于读或写创建的文件。
object.CreateTextFile(filename[, overwrite[, unicode]])
object必选项。应为 FileSystemObject 或 Folder 对象的名称。
filename必选项。字符串表达式,指明要创建的文件。
overwrite可选项。Boolean 值指明是否可以覆盖现有文件。如果可覆盖文件,该值为 Tr;如果不能覆盖文件,则该值为 False 。如果省略该值,则不能覆盖现有文件。
unicode可选项。Boolean 值指明是否以 Unicode 或 ASCII 文件格式创建文件。如果以 Unicode 文件格式创建文件,则该值为 Tr;如果以 ASCII 文件格式创建文件,则该值为 False。如果省略此部分,则假定创建 ASCII 文件。
例子:Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:/test.txt", Tr)
MyFile.WriteLine("这是一个测试。")
MyFile.Close
6:DeleteFile 方法 删除指定的文件。
object.DeleteFile filespec[, force]
object必选项。应为 FileSystemObject 的名称。
filespec必选项。要删除的文件名。filespec 在路径的最后一个组成部分中可包含通配符。
force可选项。Boolean 值。如果要删除只读文件,则该值为 Tr;否则为 False(默认)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
fso.deletefile("c:/test.txt")
7:DeleteFolder 方法 删除指定的文件夹和其中的内容。
object.DeleteFolder folderspec[, force]
object必选项。应为 FileSystemObject 的名称。
folderspec必选项。要删除的文件夹名称。folderspec 在路径的最后一个组成部分中可包含通配符。
force可选项。Boolean 值。如果要删除只读文件夹,则该值为 Tr; 否则为 False(默认)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
fso.deletefolder("c:/test")
8:DriveExists 方法 如果指定的驱动器存在,则返回 Tr;否则返回 False。
object.DriveExists(drivespec)
object必选项。应为 FileSystemObject 对象的名称。
drivespec必选项。驱动器号或指定的完整路径。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.driveexists("c")
注意,必须加上引号,驱动器冒号可以不加。
9:FileExists 方法 如果指定的文件存在返回 Tr;否则返回 False。
object.FileExists(filespec)
object必选项。应为 FileSystemObject 对象的名称。
filespec必选项。文件名,表示要确定是否存在的文件。如果文件不在当前文件夹中,则必须提供完整路径名(绝对路径或相对路径)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.fileexists("c:/test.txt")
10:FolderExists 方法 如果指定的文件夹存在,则返回 Tr;否则返回 False。
object.FolderExists(folderspec)
object必选项。应为 FileSystemObject 的名称。
folderspec必选项。文件夹名称,表示要确定是否存在的文件夹。如果该文件夹不在当前文件夹中,则必须提供完整路径名(绝对路径或相对路径)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.folderexists("c:/test")
11:GetAbsolutePathName 方法--从提供的指定路径中返回完整且含义明确的路径。
object.GetAbsolutePathName(pathspec)
object必选项。应为 FileSystemObject 的名称。
pathspec必选项。指定的路径,该路径要转换为完整且含义明确的路径。
例子:1:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.GetAbsolutePathName("")
会得到"当前路径"
2:
dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.GetAbsolutePathName("ddd/aaa")
会得到"当前路径/ddd/aaa"
12:GetBaseName 方法 返回字符串,其中包含文件的基本名 (不带扩展名), 或者提供的路径说明中的文件夹。
object.GetBaseName(path)
object必选项。应为 FileSystemObject 的名称。
path必选项。指定文件或文件夹的路径,要返回其组成部分的基本名。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.GetbaseName("c:/test.txt")
将会显示"test"
13:GetDrive 方法--返回与指定的路径中驱动器相对应的 Drive 对象。
object.GetDrive drivespec
object必选项。应为 FileSystemObject 的名称。
drivespec必选项。drivespec 可以是驱动器号 (c)、带冒号的驱动器号 (c:)、带有冒号与路径分隔符的驱动器号 (c:/) 或任何指定的网络共享 (//computer2/share1),但是不能包含文件夹或路径。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getdrive("c:")
将会返回c:
14:GetDriveName 方法--返回包含指定路径中驱动器名的字符串。
object.GetDriveName(path)
object必选项。应为 FileSystemObject 的名称。
path必选项。指定路径或者文件名,要返回其组成部分的驱动器名。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getdrivename("c:test/s.txt")
会返回"c:"
15:GetExtensionName 方法-返回字符串,该字符串包含路径最后一个组成部分的扩展名。
object.GetExtensionName(path)
object必选项。应为 FileSystemObject 的名称。
path必选项。指定路径,用于返回其组成部分的扩展名。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getextensionname("c:test/s.txt")
将会返回"txt"
16:GetFile 方法--返回与指定路径中某文件相应的 File 对象。
object.GetFile(filespec)
object必选项。应为 FileSystemObject 的名称。
filespec必选项。filespec 是指定文件的路径(绝对路径或相对路径)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getfile("test.txt")
比如本文件夹下有个test.txt文件,即可得到这个文件的绝对路径
17:GetFileName 方法--返回指定路径(不是指定驱动器路径部分)的最后一个文件或文件夹。
object.GetFileName(pathspec)
object必选项。应为 FileSystemObject 的名称。
pathspec必选项。指定文件的路径(绝对路径或相对路径)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getfilename("c:/test.txt")
将会返回文件名称test.txt
18:GetFolder 方法--返回与指定的路径中某文件夹相应的 Folder 对象。
object.GetFolder(folderspec)
object必选项。应为 FileSystemObject 的名称。
folderspec必选项。folderspec 是指定文件夹的路径(绝对路径或相对路径)。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getfolder("c:/test")
好像没有什么用,写什么就返回什么。
19:GetParentFolderName 方法--返回字符串,该字符串包含指定的路径中最后一个文件或文件夹的父文件夹。
object.GetParentFolderName(path)
object必选项。应为 FileSystemObject 的名称。
path必选项。指定路径,要返回文件或文件夹的父文件夹名。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Getparentfoldername("c:/test/t")
将会返回"c:/test"
20:GetSpecialFolder 方法--返回指定的特殊文件夹。
object.GetSpecialFolder(folderspec)
object必选项。应为 FileSystemObject 的名称。
folderspec必选项。要返回的特殊文件夹名称。可以是“设置”部分列出的任何常数。
folderspec 可为下列值:
常数 | 值 | 描述 |
WindowsFolder | 0 | Windows 文件夹,包含 Windows 操作系统安装的文件。 |
SystemFolder | 1 | System 文件夹,包含库、字体和设备驱动程序文件。 |
TemporaryFolder | 2 | Temp 文件夹,用于保存临时文件。可以在 TMP环境变量中找到该文件夹的路径。 |
21:GetTempName 方法--返回随机生成的临时文件或文件夹的名称,用于执行要求临时文件或文件夹的操作。
object.GetTempName
可选项参数 object 应为 FileSystemObject 对象的名称。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
msgbox fso.Gettempname
将会返回一个文件名rad?????.tem
22:MoveFile 方法--将一个或多个文件从某位置移动到另一位置。
object.MoveFile source, destination
object必选项。应为 FileSystemObject 的名称。
source必选项。要移动的文件的路径。source 参数字符串仅可在路径的最后一个组成部分中用通配符。
destination必选项。指定路径,表示要将文件移动到该目标位置。destination 参数不能包含通配符。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
fso.movefile "c:/test.txt","d:/test.txt"
23:MoveFolder 方法--将一个或多个文件夹从某位置移动到另一位置。
object.MoveFolder source, destination
object必选项。应为 FileSystemObject 的名称。
source必选项。要移动的文件夹的路径。source 参数字符串仅可在路径的最后一个组成部分中包含通配符。
destination必选项。指定路径,表示要将文件夹移动到该目标位置。destination 参数不能包含通配符。
例子:dim fso
set fso=createobject("scripting.filesystemobject")
fso.movefile "c:/test","d:/"
24:OpenTextFile 方法--打开指定的文件并返回一个 TextStream 对象,可以读取、写入此对象或将其追加到文件。
object.OpenTextFile(filename[, iomode[, create[, format]]])
object必选项。应为 FileSystemObject 对象的名称。
filename必选项。字符串表达式,指明要打开的文件名称。
iomode可选项。输入/输出模式,是下列三个常数之一:ForReading,ForWriting,或 ForAppending。create可选项。Boolean 值,指出当指定的 filename 不存在时是否能够创建新文件。允许创建新文件时为 Tr,否则为 False。默认值为 False。format
可选项。三个 Tristate 值之一,指出以何种格式打开文件。若忽略此参数,则文件以 ASCII 格式打开。
iomode 参数可为下列设置之一:
常数 | 值 | 描述 |
ForReading | 1 | 以只读模式打开文件。不能对此文件进行写操作。 |
ForWriting | 2 | 以只写方式打开文件。不能对此文件进行读操作。 |
ForAppending | 8 | 打开文件并在文件末尾进行写操作。 |
〈P〉 format 参数可为下列设置之一:
常数 | 值 | 描述 |
TristateUseDefault | -2 | 以系统默认格式打开文件。 |
TristateTr | -1 | 以 Unicode 格式打开文件。 |
TristateFalse | 0 | 以 ASCII 格式打开文件。 |
例子:Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:/testfile.txt", 2, Tr)
f.Write "嗨,你好!"
f.Close
二、Drive 对象--提供对磁盘驱动器或网络共享的属性的访问。
注意:此对象无任何方法,所以不存在filesystemobject一样的那种操作。
只能先获取filesystemobject对象再获取drive对象
Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
这样才可以操作,操作时属性放在d的后面,d全权代表了drive
01:AvailableSpace 属性--返回指定的驱动器或网络共享对于用户的可用空间大小。
object.AvailableSpace
object 应为 Drive 对象的名称。
AvailableSpace 属性与 FreeSpace 属性返回的值基本相同。对于支持限额的计算机系统来说,这两个属性返回的值有所差异。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
msgbox d.AvailableSpace/1024/1024&"MB"
02:DriveLetter 属性--返回本地驱动器或网络共享的驱动器号。只读。
object.DriveLetter
object 应为 Drive 对象的名称。如果指定的驱动器没有与驱动器号相关联(例如,一个网络共享未映射驱动器号),则 DriveLetter 属性返回零长度字符串 ("")。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(fso.GetDriveName("c:"))
msgbox d.DriveLetter
将会返回"c"这一个字符。
03:DriveType 属性--返回一个描述指定驱动器的类型的值。
object.DriveType
object 应为 Drive 对象的名称。
驱动器类型
0: "未知"1: "可移动"2: "固定"3: "网络"4: "CD-ROM"5: "RAM 磁盘"
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(fso.GetDriveName("c:"))
msgbox d.Drivetype
04;FileSystem 属性--返回指定的驱动器使用的文件系统的类型。
object.FileSystem
object 应为 Drive 对象的名称。
可用的返回类型包括 FAT、NTFS 和 CDFS。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(fso.GetDriveName("c:"))
msgbox d.filesystem
将会返回"NTFS"
05:FreeSpace 属性--返回指定的驱动器或网络共享对于用户的可用空间大小。只读。
object.FreeSpace
object 应为 Drive 对象的名称。
FreeSpace 属性与 AvailableSpace 属性返回的值基本相同。对于支持限额的计算机系统来说,这两个属性返回的值有所差异。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(fso.GetDriveName("c:"))
msgbox d.freespace/1024/1024&MB
06:IsReady 属性--如果指定的驱动器就绪,返回 Tr;否则返回 False。
object.IsReady
object 应为 Drive 对象的名称。
对于可移动媒体驱动器和 CD-ROM 驱动器,仅当插入相应的媒体并准备接受访问时,IsReady 返回 Tr。
例子:Dim fso, d
set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c")
msgbox d.isready
07:Path 属性--返回指定文件、文件夹或驱动器的路径。
object.Path
object 应为 File、Folder 或 Drive 对象的名称。
对于驱动器,路径不包含根目录。例如,C 驱动器的路径是 C:,而不是 C:/。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c")
msgbox d.path
将会返回"c:"仅有冒号。
08:RootFolder 属性--返回一个 Folder 对象,表示指定驱动器的根文件夹。只读。
object.RootFolder
object 应为 Drive 对象的名称。
使用返回的 Folder 对象,可以访问指定驱动器包含的所有文件和文件夹。
例子:Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetDrive("c:/")
msgbox f.RootFolder
将会返回"c:/"注意,有反斜杠。
09:SerialNumber 属性--返回十进制序列号,用于唯一标识一个磁盘卷。
object.SerialNumber
object 应为 Drive 对象的名称。可以使用 SerialNumber 属性以确保在可移动媒体驱动器中插入正确的磁盘。
例子:Dim fso, d
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
msgbox d.SerialNumber
将会显示c盘的序列号。
10:ShareName 属性--返回指定的驱动器的网络共享名。
object.ShareName
object 应为 Drive 对象的名称。如果 object 不是一个网络驱动器,则 ShareName 属性返回零长度字符串 ("")。
例子;Dim fso, d, s, t
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
msgbox d.sharename
因为c盘不是网络驱动器,所以他返回空。
11:TotalSize 属性--返回驱动器或网络共享的总字节数。
object.TotalSize
object 应为 Drive 对象的名称。
例子:Dim fso, d, s, t
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
msgbox d.totalsize/1024/1024&MB
返回的是c盘的总大小。
12:VolumeName 属性--设置或返回指定驱动器的卷标。可读写。
object.VolumeName [= newname]
object必选项。应为 Drive 对象的名称。
newname可选项。如果提供此参数,则 newname 为指定的 object 的新名称。
例子:Dim fso, d, s, t
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive("c:/")
msgbox d.volumename
d.volumename="系统盘"
msgbox d.volumename
三、File 对象提供对文件的所有属性的访问。
Dim fso,f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile("c:/test.txt")
msgbox f.DateCreated
注意:只能先获取filesystemobject对象再获取file对象。
Set f = fso.GetFile("c:/test.txt")
这样才可以操作,操作时属性放在f的后面,d全权代表了文件。
1:Copy 方法--将指定的文件或文件夹从某位置复制到另一位置。
object.Copy destination[, overwrite]
object必选项。应为 File 或 Folder 对象的名称。
destination必选项。复制文件或文件夹的目标位置。不允许使用通配符。
overwrite可选项。Boolean 值。如果覆盖现有文件或文件夹,则 Boolean 值为 Tr(默认);否则为 False。
对 File 或 Folder 应用 Copy 方法的结果与使用 FileSystemObject.CopyFile 或 FileSystemObject.CopyFolder 执行的操作完全相同。在 FileSystemObject.CopyFile 或 FileSystemObject.CopyFolder 中,使用 object 引用文件或文件夹,并将文件或文件夹作为参数传递给 FileSystemObject.CopyFile 或 FileSystemObject.CopyFolder。然而,应该注意的是 FileSystemObject.CopyFile 或 FileSystemObject.CopyFolder 方法可以复制多个文件或文件夹。
例子:Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:/testfile.txt", Tr)
MyFile.WriteLine("这是一个测试")
MyFile.Close
Set MyFile = fso.GetFile("c:/testfile.txt")
MyFile.Copy ("c:/test1.txt")'注意,这个路径中不可以包含不存在文件夹。
2:Delete 方法--删除指定的文件或文件夹。
object.Delete force
object必选项。应为 File 或 Folder 对象的名称。
force可选项。Boolean 值。如果要删除的文件或文件夹的属性设置为只读属性,则该值为 Tr;否则为 False(默认)。
若指定文件或文件夹不存在,错误发生。有内容的文件夹和无内容的文件夹所使用的Delete方法无异。无论有无内容,指定文件夹皆被删除。
对 File 或 Folder 应用 Delete 方法的结果与使用 FileSystemObject.DeleteFile 或 FileSystemObject.DeleteFolder 执行的操作完全相同。
例子:Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:/testfile.txt", Tr)
wscript.sleep(3000)
set MyFile =fso.GetFile("c:/testfile.txt")
MyFile.delete
一定不要忘了执行delete一定是先获取了该文件才行。
3:Move 方法--将指定的文件或文件夹从某位置移动到另一位置。
object.Move destination
object
必选项。应为 File 或 Folder 对象的名称。
destination必选项。目标位置。表示要将文件或文件夹移动到该位置。不允许使用通配符。
对 File 或 Folder 应用 Move 方法的结果与使用 FileSystemObject.MoveFile 或 FileSystemObject.MoveFolder 执行的操作完全相同。然而,要注意的是 FileSystemObject.MoveFile 或 FileSystemObject.MoveFolder 方法可移动多个文件或文件夹。
例子:Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:/testfile.txt", Tr)
MyFile.WriteLine(“这是一个测试。”)
MyFile.Close
Set MyFile = fso.GetFile("c:/testfile.txt")
MyFile.Move "c:/windows/desktop/"
4:OpenAsTextStream 方法--打开指定的文件并返回一个 TextStream 对象,此对象用于对文件进行读、写或追加操作。
object.OpenAsTextStream([iomode, [format]])
object必选项。应为 File 对象的名称。
iomode可选项。输入/输出模式,是下列三个常数之一:ForReading、ForWriting 或 ForAppending。
format可选项。三个 Tristate 值之一,指出以何种格式打开文件。忽略此参数,则文件以 ASCII 格式打开。
iomode 参数可为下列设置之一:
常数 | 值 | 描述 |
ForReading | 1 | 以只读模式打开文件。不能对此文件进行写操作。 |
ForWriting | 2 | 以可读写模式打开文件。如果已存在同名的文件,则覆盖旧的文件。 |
ForAppending | 8 | 打开文件并在文件末尾进行写操作。 |
format 参数可为下列设置之一:
常数 | 值 | 描述 |
TristateUseDefault | -2 | 以系统默认格式打开文件。 |
TristateTr | -1 | 以 Unicode 格式打开文件。 |
TristateFalse | 0 | 以 ASCII 格式打开文件。 |
说明
OpenAsTextStream 方法可提供与 FileSystemObject 对象的 OpenTextFile 方法相同的功能。另外,使用 OpenAsTextStream 方法可对文件进行写操作。
01:Attributes 属性---【file、folder】设置或返回文件或文件夹的属性。可读写或只读(与属性有关)。
object.Attributes [= newattributes]
object必选项。应为 File 或 Folder 对象的名称。
newattribute可选项。如果指定此参数,则 newattributes 为指定的 object 的属性的新值。
newattributes 参数可为下列设置之一或下列设置的合理组合:
常数 | 值 | 描述 |
Normal | 0 | 普通文件。没有设置任何属性。 |
ReadOnly | 1 | 只读文件。可读写。 |
Hidden | 2 | 隐藏文件。可读写。 |
System | 4 | 系统文件。可读写。 |
Directory | 16 | 文件夹或目录。只读。 |
Archive | 32 | 上次备份后已更改的文件。可读写。 |
Alias | 1024 | 链接或快捷方式。只读。 |
Compressed | 2048 | 压缩文件。只读。 |