返回列表 上一主題 發帖

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

小誌
　暱稱: 小誌
　頭銜: 曾經也是水電工

管理員Rank: 9Rank: 9Rank: 9

帖子
1194 
主題
395 
精華
113 
積分
1747 
點名
0  
作業系統
Vista 
軟體版本
Office 2003 
閱讀權限
200 
性別
男 
來自
台灣 
註冊時間
2010-5-1 
最後登錄
2025-4-11 

2021牛年全勤獎章好學求知勳章熱烈參與勳章2017 雞年全勤獎章2018 狗年全勤獎章2019 豬年全勤獎章2020鼠年全勤獎章
1# 跳轉到 »
發表於 2011-3-22 12:24 | 顯示全部帖子
開啟指定檔案，並傳回 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

        靜思自在 : 一個缺口的杯子，如果換一個角度看它，它仍然是圓的。
返回列表 上一主題