最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线



OpenTextFile 方法

打開指定的文件并返回一個 TextStream 對象,可以讀取、寫入此對象或?qū)⑵渥芳拥轿募?P>object.OpenTextFile(filename[, iomode[, create[, format]]])

參數(shù)

object

必選項。應(yīng)為 FileSystemObject 對象的名稱。

filename

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

iomode

可選項。輸入/輸出模式,是下列三個常數(shù)之一:ForReading,F(xiàn)orWriting,或 ForAppending。

create

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

format

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

設(shè)置

iomode 參數(shù)可為下列設(shè)置之一:
常數(shù)描述
ForReading1以只讀模式打開文件。不能對此文件進行寫操作。
ForWriting2以只寫方式打開文件。不能對此文件進行讀操作。
ForAppending8打開文件并在文件末尾進行寫操作。

〈P〉 format 參數(shù)可為下列設(shè)置之一:
常數(shù)描述
TristateUseDefault-2以系統(tǒng)默認格式打開文件。
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.CloseEnd Sub

請參閱

OpenAsTextStream 方法 | CreateTextFile 方法

應(yīng)用于: FileSystemObject 對象

返回首頁 巍山| 香河县| 高唐县| 呼和浩特市| 阳高县| 金寨县| 徐闻县| 隆林| 河津市| 吉安市| 应城市| 阳西县| 新民市| 长寿区| 昂仁县| 沽源县| 连山| 哈密市| 昔阳县| 外汇| 托里县| 石泉县| 拉孜县| 凌源市| 中牟县| 五常市| 克拉玛依市| 西乌珠穆沁旗| 金寨县| 阿拉尔市| 星子县| 乌兰察布市| 陇南市| 安远县| 邛崃市| 武宁县| 嘉鱼县| 宣武区| 南漳县| 思南县| 霍林郭勒市|