其他

SkipLine 方法當讀到 TextStream 檔案時，跳過下一行。object.SkipLineobject 應為 TextStream 對象名稱。 說明跳過一行意味著讀並放棄本行所有字元並包括下一新行字元內容。 如果檔案不是以讀方式開啟則會出現錯誤。下面例子舉例說明如何使用 SkipLine 方法: Function SkipLineInFile Const ForReading = 1, ForWriting = 2 Dim fso, f Set fso =

Write 方法向 TextStream 檔案寫入指定字串。object.Write(string)參數object必選項。應為 TextStream 對象的名稱。string可選項。要寫入檔案的文本。說明指定的字串被寫入檔案中，字串之間沒有插入空格或字元。使用 WriteLine 方法寫入新行字元或以新行字元結束的字串。下面例子舉例說明如何使用 Write 方法: Function WriteToFile Const ForReading = 1, ForWriting = 2 Dim

WriteBlankLines 方法在 TextStream 檔案中寫入指定數目的新行字元。object.WriteBlankLines(lines)參數object必選項。應為 TextStream 對象的名稱。lines必選項。要向檔案寫入的新行字元數目。說明下面例子舉例說明如何使用 WriteBlankLines 方法: Function WriteBlankLinesToFile Const ForReading = 1, ForWriting = 2 Dim fso, f

WriteLine 方法向 TextStream 檔案寫入指定字串和新行字元。object.WriteLine([string])參數object必選項。應為 TextStream 對象的名稱。string可選項。要寫入檔案的文本。如果省略，將向檔案寫入新行字元。說明下面例子舉例說明如何使用 WriteLine 方法: Function WriteLineToFile Const ForReading = 1, ForWriting = 2 Dim fso, f Set fso =

Dictionary 儲存資料鍵和項目對的對象。說明Dictionary 對象與 PERL 關聯陣列是等價的。項目（可以是任何形式的資料）被儲存在數組中。每項都與唯一的鍵相關聯。索引值用於檢索單個項目，通常是整數或字串，但不能為數組。下面代碼示範如何建立 Dictionary 對象： Dim d '建立一個變數。Set d = CreateObject("Scripting.Dictionary")d.Add "a", "Athens"

Drive 對象提供對磁碟機或網際網路共用的屬性的訪問。 說明以下代碼舉例說明如何使用 Drive 對象訪問磁碟機的屬性： Function ShowFreeSpace(drvPath)Dim fso, d, s Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvPath)) s = "磁碟機 " & UCase(drvPath) &

ReadAll 方法讀入全部 TextStream 檔案並返回結果字串。object.ReadAllobject 應為 TextStream 對象的名稱。 說明對於大檔案，使用 ReadAll 方法浪費記憶體資源。應該使用其他技術輸入檔案，例如按行讀檔案。 Function ReadAllTextFile Const ForReading = 1, ForWriting = 2 Dim fso, f Set fso =

Drives 集合唯讀所有可用磁碟機的集合。說明無論是否插入媒體，抽取式媒體磁碟機都顯示在 Drives 集合中。 以下代碼舉例說明如何獲得 Drives 集合并使用 For Each...Next 語句枚舉集合成員： ShowDriveList 函數 Dim fso, d, dc, s, n Set fso = CreateObject("Scripting.FileSystemObject") Set dc = fso.Drives For Each d in dc

ReadLine 方法從 TextStream 檔案中讀入一整行字元（直到下一行，但不包括下一行字元），並返回結果字串。object.ReadLineobject 應為 TextStream 對象的名稱。 說明下面例子說明如何使用 ReadLine 方法從 TextStream 檔案中讀取字元並返回字串: Function ReadLineTextFile Const ForReading = 1, ForWriting = 2 Dim fso, MyFile Set fso =

Remove 方法從 Dictionary 對象中刪除鍵和項目對。object.Remove(key)參數object必選項。應為 Dictionary 對象的名稱。key必選項。與要從 Dictionary 對象中刪除的鍵和項目對相關聯的 Key。說明如果指定的鍵和項目對不存在，則會出現錯誤。下列代碼示範如何使用 Remove 方法： Dim a, d '建立變數。Set d = CreateObject("Scripting.Dictionary")d.

AtEndOfLine 屬性TextStream 檔案中，如果檔案指標指向行末標記，就返回 True；否則如果不是唯讀則返回 False。object.AtEndOfLineobject 應為 TextStream 對象的名稱。說明AtEndOfLine 屬性僅應用於以讀方式開啟的 TextStream 檔案，否則會出現錯誤。下列代碼舉例說明如何使用 AtEndOfLine 屬性：Function ReadEntireFile(filespec) Const ForReading = 1

DateLastModified 屬性返回指定的檔案或檔案夾的上次修改日期和時間。唯讀。object.DateLastModified object 應為 File 或 Folder 對象的名稱。說明以下代碼舉例說明如何使用 DateLastModified 屬性：Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject")

Skip 方法讀取 TextStream 檔案時跳過指定數目的字元。object.Skip(characters)參數object必選項。應為 TextStream 對象的名稱。characters必選項。讀取檔案時跳過的字元數目。說明放棄跳過的字元。下面例子說明如何利用 Skip 方法在閱讀文字檔前跳過開始的六個字元: Function SkipTextFile Const ForReading = 1, ForWriting = 2 Dim fso, f Set fso =

AtEndOfStream 屬性如果檔案指標位於 TextStream 檔案末，則返回 True；否則如果不為唯讀則返回 False。object.AtEndOfStreamobject 應為 TextStream 對象的名稱。說明AtEndOfStream 屬性僅應用於以唯讀方式開啟的 TextStream 檔案，否則會出現錯誤。下列代碼舉例說明如何使用 AtEndOfStream 屬性：Function ReadEntireFile(filespec) Const ForReading =

FileSystemObject 對象提供對電腦檔案系統的訪問。 說明以下代碼舉例說明如何使用 FileSystemObject 對象返回一個 TextStream 對象，此對象可以被讀取或寫入： Dim fso, MyFileSet fso = CreateObject("Scripting.FileSystemObject")Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)MyFile.WriteLine("This is a

Drive 屬性返回指定的檔案或檔案夾所在的磁碟機的磁碟機代號。唯讀。object.Drive object 應為 File 或 Folder 對象的名稱。說明以下代碼舉例說明如何使用 Drive 屬性：Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec)

AvailableSpace 屬性返回指定的磁碟機或網際網路共用對於使用者的可用空間大小。object.AvailableSpace object 應為 Drive 對象的名稱。說明AvailableSpace 屬性與 FreeSpace 屬性返回的值基本相同。對於支援限額的電腦系統來說，這兩個屬性返回的值有所差異。下面代碼舉例說明如何使用 AvailableSpace 屬性：Function ShowAvailableSpace(drvPath) Dim fso, d, s Set

Column 屬性唯讀屬性，返回 TextStream 檔案中當前字元位置的列號。object.Columnobject 通常是 TextStream 對象的名稱。說明在寫入新行字元後，但在寫其他字元前，Column 等於 1。下面例子舉例說明如何使用 Column屬性:Function GetColumn Const ForReading = 1, ForWriting = 2 Dim fso, f, m Set fso =

CompareMode 屬性設定並返回在 Dictionary 對象中比較字串關鍵字的比較模式。object.CompareMode[ = compare]參數object必選項。Dictionary 對象的名稱。compare可選項。如果提供此參數，compare 參數為數值，表示由函數如 StrComp 使用的比較模式。設定compare

Count 屬性返回一個集合或 Dictionary 對象包含的項目數。唯讀。object.Count object 可以是“應用於”列表中列出的任何集合或對象的名稱。說明以下代碼舉例說明如何使用 Count 屬性：Function ShowKeys Dim a, d, i, s ' 建立一些變數。 Set d = CreateObject("Scripting.Dictionary") d.Add "a", "Athens" ' 添加一些鍵和項目。