問題描述:
多次向文本文件寫入數據時，之前寫入的數據不會受到影響；讀取數據是只讀取文本中指定行的部分數據？謝謝妳
分析:
用FileSystemObject對象創建TextStream可以實現對文本文件的讀寫。
-
創建指定的文件並返回TextStream對象，該對象可用於讀取或寫入創建的文件。
語法
對象。CreateTextFile(文件名[，覆蓋[，unicode]])
CreateTextFile方法的語法包含以下部分:
需要對象。需要FileSystemObject或Folder對象的名稱。
需要文件名。指示要創建的文件的字符串表達式。
覆蓋是可選的。布爾值表示是否可以覆蓋現有文件。真實；如果文件可以被覆蓋；如果文件不能被覆蓋，則該值為False。如果省略該值，則無法覆蓋現有文件。
Unicode選項。布爾值表示文件是以Unicode還是ASCII文件格式創建的。真實；如果文件是以Unicode文件格式創建的；如果文件是以ASCII文件格式創建的，則該值為False。如果省略這壹部分，則假定創建了壹個ASCII文件。
解釋
下面的代碼闡釋了如何使用CreateTextFile方法創建和打開文本文件:
子創建文件
Dim fso，MyFile
Set fso = CreateObject("Scripting。文件系統對象”)
設置MyFile = fso。create textfile(" c:\ testfile . txt "，True)
我的文件。WriteLine("這是壹個測試。")
我的文件。關閉
末端接頭
對於文件名已經存在的文件，如果overwrite參數為False或未提供該參數，將會出現錯誤。
-
形容
打開指定文件並返回壹個TextStream對象，該對象可被讀取、寫入或追加到文件中。
語法
對象。OpenTextFile(文件名[，iomode[，創建[，格式]]])
OpenTextFile方法的語法由以下部分組成:
需要對象。需要FileSystemObject對象的名稱。
需要文件名。字符串表達式，指示要打開的文件的名稱。
Iomode是可選的。輸入/輸出模式是以下三個常量之壹:ForReading、ForWriting或ForAppending。
創建是可選的。布爾值，指示當指定的文件名不存在時是否可以創建新文件。如果允許創建新文件，則為True，否則為False。默認值為False。
格式是可選的。三個三態值之壹，指示打開文件的格式。如果省略該參數，文件將以ASCII格式打開。
建立
Iomode參數可以是下列設置之壹:
ForReading 1以只讀模式打開文件。無法寫入此文件。
ForWriting 2以只寫模式打開文件。無法讀取該文件。
ForAppending 8打開文件並在文件末尾寫入。
格式參數可以是下列設置之壹:
tristeusedefault-2以系統默認格式打開文件。
tristat true-1以Unicode格式打開文件。
TristateFalse 0以ASCII格式打開文件。
解釋
以下代碼闡釋了如何使用OpenTextFile方法打開寫文件:
Sub OpenTextFileTest
Const ForReading = 1，ForWriting = 2，ForAppending = 8
維度fso，f
Set fso = CreateObject("Scripting。文件系統對象”)
設置f = fso。OpenTextFile("c:\testfile.txt "，用於寫入，True)
F.寫“嗨，妳好！”
f.關閉
末端接頭
-
TextStream也有以下方法:
關閉方法
讀取方法
ReadAll方法
讀取線方法
跳過方法
斯基普林法
書寫方法
WriteLine方法
WriteBlankLines方法
有關詳細信息，請參考VBScript 5.0幫助文檔。