麻辣家族討論版版 » VB 與 VB.Net » 請問,文字檔已存在,但是如要重新覆寫如何寫?

返回列表下一主題上一主題發帖

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

中學生 Rank: 2

帖子: 199
主題: 45
精華: 0
積分: 252
點名: 0
作業系統: windows 7 (X64)
軟體版本: office 2010 (x64)
閱讀權限: 20
性別: 男
來自: 桃園
註冊時間: 2010-12-24
最後登錄: 2020-3-31

論壇贊助勳章論壇榮譽勳章

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2011-3-22 11:35 | 只看該作者

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

我的文字已存在(per_f),但是每次要執行程式時,都必須重新覆寫,請問如何開啟這個檔案,我嘗試了許多方式都没辦法,請各位前輩指點,謝謝!!

fs = File.Create(per_f)
fs.Close()

Using outf_sw As StreamWriter = New StreamWriter(per_f, FileMode.Create)
End Using

如上是我嘗試用的方式,但是都只能 append 在檔案後面.

樓主熱帖

收藏

V98

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

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

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

2021牛年全勤獎章好學求知勳章熱烈參與勳章 2017 雞年全勤獎章 2018 狗年全勤獎章 2019 豬年全勤獎章 2020鼠年全勤獎章

2^#

發表於 2011-3-22 12:24 | 只看該作者

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

object.OpenTextFile(filename[, iomode[, create[, format]]])以下的程式碼說明如何使用 OpenTextFile 方法來開啟檔案並附加文字資料：

Sub OpenTextFileTest
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,True)
f.Write "Hello world!"
f.Close
End Sub

複製代碼

注意:Const ForReading = 1, ForWriting = 2, ForAppending = 8

心安，平安
發表任何無意義的感謝或灌水文章一律砍,珍惜帳號,請詳閱版規!!

靜思自在 : 甘願做、歡喜受。

返回列表下一主題上一主題