標題: 請問,文字檔已存在,但是如要重新覆寫如何寫? [打印本頁]

---

作者: linshin1999    時間: 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 在檔案後面.

---

作者: 小誌    時間: 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

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)