建站
咨詢
售后
建站咨詢
新聞中心
vb.net 怎么寫入和多行讀取txt文件，而且多次寫如之前的不被覆蓋？
.net應該提供了此類函數(shù)。如C#就有File.AppendAllText(filename,string)用于追加內容，F(xiàn)ile.ReadAllLine(filename)用于讀取多行。
創(chuàng)新互聯(lián)主要從事網頁設計、PC網站建設（電腦版網站建設）、wap網站建設（手機版網站建設）、響應式網站建設、程序開發(fā)、網站優(yōu)化、微網站、微信小程序開發(fā)等，憑借多年來在互聯(lián)網的打拼，我們在互聯(lián)網網站建設行業(yè)積累了豐富的成都網站制作、網站建設、網站設計、網絡營銷經驗，集策劃、開發(fā)、設計、營銷、管理等多方位專業(yè)化運作于一體。
vb.net 中如何進行文件的讀寫
一般來講asp.net的服務器運行應用所用的賬號只有對應用所在目錄(放網頁的目錄)的訪問權限，你可以把文件存儲在應用所在目錄或者子目錄試試。
My.Computer.FileSystem.WriteAllText(Server.MapPath("") “\" Now.toString("yyyyMMdd") ".txt", "URL：XXXXXX查詢完成，匹配成功！" vbCrLf, true, System.Text.Encoding.Default)
請教在VB.net中如何將數(shù)據(jù)寫入txt文件、再從txt文件讀出？
軟糖來告訴你吧。
VB.net中讀寫文件主要使用System.IO命名空間。
① 使用 File.ReadAllText 讀取
Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 讀取，注意編碼格式和寫入的編碼保持一致。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
③ 使用 File.WriteAllText 寫入，會覆蓋同名的文件。
Dim 要寫的內容 As String = ""
File.WriteAllText(文件路徑, 要寫的內容, System.Text.Encoding.UTF8)
④ 使用 StreamWriter 寫入。
Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)
sw.WriteLine(TextTB.Text)
sw.Close()
⑤ 使用 StreamWriter 追加寫入。
將上面代碼的第二個參數(shù)False改為True。
◆ 滿意請采納，謝謝 ◆
關于VB.NET寫文件的問題
Dim sr As New IO.StreamReader("路徑") '打開文件
Dim str As String = sr.ReadToEnd() '讀取文本
sr.Close() '關閉流
str = "not" str '修改文字
Dim sw As New IO.StreamWriter("路徑") '打開
sw.Write(str) '寫入
sw.Close() '關閉
vb.net中，讀取和寫入文件
寫入：Dim sr As New IO.StreamWriter(Application.StartupPath "/寫入的文本.txt")
sr.WriteLine("寫入的內容") sr.Close()讀?。篒f (File.Exists(Application.StartupPath "/msg.txt")) Then
Dim fm As New IO.FileStream(Application.StartupPath "/讀取的文本.txt", FileMode.Open)
Dim sr As IO.StreamReader = New IO.StreamReader(fm)
Do While sr.Peek() = 0
TextBox1.Text = sr.ReadLine() （讀取文本到文本框）
Loop end if
vb.net怎么往已經建立好的dat文件里寫東西，還不覆蓋原本的數(shù)據(jù)？
如果想繼續(xù)編輯之前的文檔，在TXT文件尾部繼續(xù)添加文本，那么還需要在函數(shù)后邊加個參數(shù)。
VB 代碼
方法1：
? Dim?sw?As?StreamWriter =?New?StreamWriter("C:\temp\test.txt")
? sw.Write("abc"? vbCrLf)
sw.Close()
Dim?sw2?As?StreamWriter =?New?StreamWriter("C:\temp\test.txt",?True)
sw2.Write("456"? vbCrLf)
sw2.Close()
方法2：
? My.Computer.FileSystem.WriteAllText("test.txt",?"This is test Text",?True)
方法3：
? System.IO.File.AppendAllText("c:\temp\test.txt",?"this is extra test file")
詳見：“網頁鏈接”?
網頁標題：vb.net+續(xù)寫文件的簡單介紹
分享地址：http://fisionsoft.com.cn/article/dodspci.html
