vb.net 中如何進(jìn)行文件的讀寫

一般來講asp.net的服務(wù)器運行應(yīng)用所用的賬號只有對應(yīng)用所在目錄(放網(wǎng)頁的目錄)的訪問權(quán)限，你可以把文件存儲在應(yīng)用所在目錄或者子目錄試試。

創(chuàng)新互聯(lián)專注于富源網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供富源營銷型網(wǎng)站建設(shè)，富源網(wǎng)站制作、富源網(wǎng)頁設(shè)計、富源網(wǎng)站官網(wǎng)定制、小程序開發(fā)服務(wù)，打造富源網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供富源網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。

My.Computer.FileSystem.WriteAllText(Server.MapPath("") “\" Now.toString("yyyyMMdd") ".txt", "URL：XXXXXX查詢完成，匹配成功！" vbCrLf, true, System.Text.Encoding.Default)

vb.net 里怎樣才能只寫入一行到指定文件里

Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim bool As Boolean = False

bool = wirte("夢語.txt", "新內(nèi)容?。?！")

If bool Then

MessageBox.Show("數(shù)據(jù)已寫入")

Else

MessageBox.Show("寫入數(shù)據(jù)時出錯")

End If

End Sub

'FilePath 為文件路徑

'Str要寫入的內(nèi)容

Public Function wirte(ByVal FilePath As String, ByVal Str As String) As Boolean

Dim sr As StreamReader

Dim sw As StreamWriter

Try

sr = New StreamReader(FilePath)

Dim oldStr As String = sr.ReadToEnd()

sr.Close()

sw = New StreamWriter(FilePath)

'判斷以前的文本是否有記錄

If oldStr.Length 0 Then

'寫入以前的數(shù)據(jù)

sw.WriteLine(oldStr)

End If

'在文件尾部添加新的內(nèi)容

sw.Write(Str)

sw.Close()

Return True

Catch ex As Exception

Return False

Finally

If sr IsNot Nothing Then

sr.Close()

End If

If sw IsNot Nothing Then

sw.Close()

End If

End Try

End Function

End Class

vb.net中，讀取和寫入文件

寫入：Dim sr As New IO.StreamWriter(Application.StartupPath "/寫入的文本.txt")

sr.WriteLine("寫入的內(nèi)容") 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 文件寫入磁盤問題

你用的WriteLine, Line就是行，所以會加換行符

如果用Sw1.Write("....");就不會換行

vb.net 將“1111”寫入TXT文件中

If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

My.Computer.FileSystem.WriteAllText(SaveFileDialog1.FileName, "1111", True)

End If

就可以了

請教，vb.net寫入文件問題，為什么我用兩種辦法寫文件只能寫入最后一行

寫入模式為覆蓋會出現(xiàn)這個現(xiàn)象

要使用添加模式

就會累加了

本文名稱：vb.net文件寫入 vb寫入Excel
網(wǎng)頁URL：http://www.aaarwkj.com/article32/doodspc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供App設(shè)計、定制網(wǎng)站、網(wǎng)站收錄、網(wǎng)站排名、營銷型網(wǎng)站建設(shè)、手機網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)