国产高清在线免费观看-国产高清在线免费无码-国产高清在线男人的天堂-国产高清在线视频-国产高清在线视频精品视频-国产高清在线视频伊甸园

打開指定的文件并返回一個(gè) TextStream 對象，可以讀取、寫入此對象或?qū)⑵渥芳拥轿募?

object.OpenTextFile(filename[, iomode[, create[, format]]])
參數(shù)
object ：必選項(xiàng)。應(yīng)為 FileSystemObject 對象的名稱。
filename ：必選項(xiàng)。字符串表達(dá)式，指明要打開的文件名稱。
iomode ：可選項(xiàng)。輸入/輸出模式，是下列三個(gè)常數(shù)之一：ForReading，F(xiàn)orWriting,或 ForAppending。
create ：可選項(xiàng)。Boolean 值，指出當(dāng)指定的 filename 不存在時(shí)是否能夠創(chuàng)建新文件。允許創(chuàng)建新文件時(shí)為 True，否則為 False。默認(rèn)值為 False。
format ：可選項(xiàng)。三個(gè) Tristate 值之一，指出以何種格式打開文件。若忽略此參數(shù)，則文件以 ASCII 格式打開。
設(shè)置
iomode 參數(shù)可為下列設(shè)置之一：
常數(shù) 值 描述
ForReading 1 以只讀模式打開文件。不能對此文件進(jìn)行寫操作。
ForWriting 2 以只寫方式打開文件。不能對此文件進(jìn)行讀操作。
ForAppending 8 打開文件并在文件末尾進(jìn)行寫操作。
format 參數(shù)可為下列設(shè)置之一：
常數(shù) 值 描述
TristateUseDefault -2 以系統(tǒng)默認(rèn)格式打開文件。
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", ForWriting, True)
f.Write "嗨，你好！"
f.Close
End Sub

 

 

The OpenTextFile method opens a specified file and returns a TextStream object that can be used to access the file.
ASP OpenTextFile的作用是打開一個(gè)指定的文件或者返回一個(gè)能夠訪問文件的文本流（TextStream）對象。

Syntax
語法

FileSystemObject.OpenTextFile(fname,mode,create,format)

Parameter參數(shù)	Description描述
fname	Required. The name of the file to open 必要參數(shù)。指定需要打開文件的名稱
mode	Optional. How to open the file 可選組件。規(guī)定打開文件的方式 1=ForReading - Open a file for reading. You cannot write to this file. 1=ForReading（以閱讀內(nèi)容為目的） – 打開文件進(jìn)行內(nèi)容閱讀，但是你不可以在這個(gè)文件上書寫內(nèi)容。 2=ForWriting - Open a file for writing. 2=ForWriting（以書寫內(nèi)容為目的）- 打開文件進(jìn)行內(nèi)容書寫。 8=ForAppending - Open a file and write to the end of the file. 8=ForAppending（以追加內(nèi)容為目的）- 打開一個(gè)文件直接在這個(gè)文件內(nèi)容最后追加內(nèi)容
create	Optional. Sets whether a new file can be created if the filename does not exist. True indicates that a new file can be created, and False indicates that a new file will not be created. False is default 可選組件。設(shè)置是否可以建立一個(gè)原本不存在的新文件。如果為true真，則可以建立一個(gè)新的文件，如果為false假，則不可以建立一個(gè)新的文件。默認(rèn)情況是false假。
format	Optional. The format of the file 可選組件。規(guī)定文件的格式 0=TristateFalse - Open the file as ASCII. This is default. 0= TristateFalse – 以ASCII形式打開文件。這是原來的默認(rèn)屬性 -1=TristateTrue - Open the file as Unicode. -1=TristateTrue – 以Unicode形式打開文件 -2=TristateUseDefault - Open the file using the system default. -2=TristateUseDefault – 使用系統(tǒng)默認(rèn)的格式打開文件

Example
舉例

<% dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.OpenTextFile(Server.MapPath("testread.txt"),8,true) f.WriteLine("This text will be added to the end of file") f.Close set f=Nothing set fs=Nothing %>