返回列表 上一主題 發帖

請問,文字檔已存在,但是如要重新覆寫如何寫?

開啟指定檔案,並傳回 TextStream 物件,以用來讀取、或附加到該檔。

object.OpenTextFile(filename[, iomode[, create[, format]]])以下的程式碼說明如何使用 OpenTextFile 方法來開啟檔案並附加文字資料:
  1. Sub OpenTextFileTest
  2.   Const ForReading = 1, ForWriting = 2, ForAppending = 8
  3.   Dim fs, f
  4.   Set fs = CreateObject("Scripting.FileSystemObject")
  5.   Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,True)
  6.   f.Write "Hello world!"
  7.   f.Close
  8. End Sub
複製代碼
注意:Const ForReading = 1, ForWriting = 2, ForAppending = 8
心安,平安   
發表任何無意義的感謝或灌水文章一律砍,珍惜帳號,請詳閱版規!!

TOP

        靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候,卻被這種隨心所欲的自由蒙蔽,虛擲時光而毫無覺知。
返回列表 上一主題