使用 VB.NET,我尝试创建一个文本文件(如果它不存在)或将文本附加到它(如果存在)。
出于某种原因,虽然它正在创建文本文件,但我收到一条错误消息,指出进程无法访问文件。
当我运行程序时,它正在写入文本,但如何让它在新行上写入?
Dim strFile As String = "C:\ErrorLog_" & DateTime.Today.ToString("dd-MMM-yyyy") & ".txt"
Dim sw As StreamWriter
Dim fs As FileStream = Nothing
If (Not File.Exists(strFile)) Then
Try
fs = File.Create(strFile)
sw = File.AppendText(strFile)
sw.WriteLine("Start Error Log for today")
Catch ex As Exception
MsgBox("Error Creating Log File")
End Try
Else
sw = File.AppendText(strFile)
sw.WriteLine("Error Message in Occured at-- " & DateTime.Now)
sw.Close()
End If
最佳答案
试试这个:
Dim strFile As String = "yourfile.txt"
Dim fileExists As Boolean = File.Exists(strFile)
Using sw As New StreamWriter(File.Open(strFile, FileMode.OpenOrCreate))
sw.WriteLine( _
IIf(fileExists, _
"Error Message in Occured at-- " & DateTime.Now, _
"Start Error Log for today"))
End Using
关于vb.net - 在 VB.NET 中创建文本并将其附加到 txt 文件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1613666/