国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS教程:方法-OpenTextFile 方法

2019-10-26 17:55:44
字體:
來源:轉載
供稿:網友

OpenTextFile 方法

打開指定的文件并返回一個 TextStream 對象,可以讀取、寫入此對象或將其追加到文件。

object.OpenTextFile(filename[, iomode[, create[, format]]])

參數

object

必選項。應為 FileSystemObject 對象的名稱。

filename

必選項。字符串表達式,指明要打開的文件名稱。

iomode

可選項。輸入/輸出模式,是下列三個常數之一:ForReading,ForWriting,或 ForAppending。

create

可選項。Boolean 值,指出當指定的 filename 不存在時是否能夠創建新文件。允許創建新文件時為 True,否則為 False。默認值為 False。

format

可選項。三個 Tristate 值之一,指出以何種格式打開文件。若忽略此參數,則文件以 ASCII 格式打開。

設置

iomode 參數可為下列設置之一:

常數描述
ForReading1以只讀模式打開文件。不能對此文件進行寫操作。
ForWriting2以只寫方式打開文件。不能對此文件進行讀操作。
ForAppending8打開文件并在文件末尾進行寫操作。

〈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
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 嘉善县| 沁阳市| 象州县| 崇义县| 天镇县| 甘德县| 瑞昌市| 蕉岭县| 和静县| 安乡县| 苗栗县| 广丰县| 新建县| 鹰潭市| 东光县| 浦县| 浏阳市| 会昌县| 绥德县| 西昌市| 滦南县| 渝中区| 广宁县| 佛冈县| 大城县| 南部县| 绥滨县| 长葛市| 和政县| 娱乐| 军事| 阳江市| 桃源县| 云霄县| 馆陶县| 枝江市| 榆中县| 嘉兴市| 泌阳县| 湾仔区| 东台市|