| 常數 | 值 | 描述 |
|---|---|---|
| ForReading | 1 | 以只讀模式打開文件。不能對此文件進行寫操作。 |
| ForWriting | 2 | 以只寫方式打開文件。不能對此文件進行讀操作。 |
| ForAppending | 8 | 打開文件并在文件末尾進行寫操作。 |
〈P〉 format 參數可為下列設置之一:
| 常數 | 值 | 描述 |
|---|---|---|
| TristateUseDefault | -2 | 以系統默認格式打開文件。 |
| TristateTrue | -1 | 以 Unicode 格式打開文件。 |
| TristateFalse | 0 | 以 ASCII 格式打開文件。 |
以下代碼舉例說明如何使用 OpenTextFile 方法打開寫文件:
Sub OpenTextFileTest Const ForReading = 1, ForWriting = 2, ForAppending = 8 Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.OpenTextFile("c:\testfile.txt", For Writing, True) f.Write "嗨,你好!"f.Close