VBS脚本技术手册(2)

来源:互联网 发布:水性互穿网络防腐底漆 编辑:程序博客网 时间:2024/06/06 20:06

六、输入函数: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

压缩文件。只读。

原创粉丝点击