如何附加到文件

-1

我編碼此代碼以保存我的密碼生成到一個文件。我無法附加這個文件。它只是提示我保存一個新文件。當我點擊生成第二次我要追加文件時，密碼將被保存在，當被問及用文件中的逗號或中斷生成密碼時。如何附加到文件

我是VB.Net的新手！

Using dlg As SaveFileDialog = New SaveFileDialog 
     dlg.Title = "Save" 
     dlg.Filter = "Rich Text Files (*.rtf)|*.rtf|Html File (*.html)| *.Html|Text File (*.txt)|*.txt" 
     dlg.CheckPathExists = True 
     dlg.InitialDirectory = "C:\" 
     dlg.DefaultExt = "txt" 
     Dim myReturn As DialogResult = dlg.ShowDialog() 

     If System.Windows.Forms.DialogResult.OK.Equals(myReturn) Then 
      System.IO.File.WriteAllText(dlg.FileName, TextBox1.Text) 
     End If 
    End Using

來源

2017-02-08 Sylvain Labelle

那麼你的代碼都不是VBScript，所以你在用什麼？對我來說，語法看起來更像VB.Net。 – Lankymart

[在VB.NET中創建和附加文本到txt文件]可能的副本（http://stackoverflow.com/questions/1613666/creating-and-appending-text-to-txt-file-in-vb-net） – Lankymart

@Icemanind如[重複]中所述（http://stackoverflow.com/a/1613735/692942）。 – Lankymart

首先檢查權限。你打開它時是否以管理員身份運行？右鍵單擊/以管理員身份運行...

然後檢查文件夾權限。/properties/security/

來源

2017-02-08 18:54:56

WriteAllText不會追加到文件。您必須使用AppendAllText來附加到文件。還要確保文件不處於編輯模式，即由其他程序打開/鎖定。嘗試下面的代碼，它會顯示錯誤消息，如果它無法追加。該錯誤消息將幫助您本地化問題，並且可以嘗試解決該問題。

Try 
    Using dlg As SaveFileDialog = New SaveFileDialog 
     dlg.Title = "Save" 
     dlg.Filter = "Rich Text Files (*.rtf)|*.rtf|Html File (*.html)| *.Html|Text File (*.txt)|*.txt" 
     dlg.CheckPathExists = True 
     dlg.InitialDirectory = "C:\" 
     dlg.DefaultExt = "txt" 

     If dlg.ShowDialog() = Windows.Forms.DialogResult.OK Then 
      System.IO.File.AppendAllText(dlg.FileName, TextBox1.Text) 
     End If 

    End Using 
Catch ex As Exception 
    MessageBox.Show(ex.Message) 
End Try

來源

2017-02-09 03:36:07

真的嗎？標記爲重複，但仍然有人忽略它併發布[已經給出的答案]（http://stackoverflow.com/a/1613735/692942）。 – Lankymart

它要求我再次保存一個新的文件，當我點擊我的生成按鈕，當我點擊一個我已經創建的第一個地方，它想覆蓋它，我只是想每次會議要求一次？ –

如何附加到文件

回答

相關問題