2017-02-08 7 views
-1

Ich habe diesen Code codiert, um mein Passwort in einer Datei gespeichert zu speichern. Ich kann diese Datei nicht anhängen. Es fordert mich nur auf, eine neue Datei zu speichern. Wenn ich ein zweites Mal auf "Erzeugen" klicke, möchte ich die Datei anhängen, in der das Passwort gespeichert wird, wenn Sie aufgefordert werden, ein Passwort mit einem Komma oder einem Bruch in der Datei zu erzeugen.Wie an die Datei anhängen

Ich bin ein Neuling mit 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 
+0

Nun, keiner Ihrer Code ist VBScript, also was verwenden Sie? Die Syntax sieht für mich eher wie VB.Net aus. – Lankymart

+0

Mögliches Duplikat von [Text in txt-Datei in VB.NET erstellen und anhängen] (http://stackoverflow.com/questions/1613666/creating-and-appending-text-to-txt-file-in-vb-net) – Lankymart

+0

@Icemanind wie angegeben [im Duplikat] (http://stackoverflow.com/a/1613735/692942). – Lankymart

Antwort

0

Zuerst die Berechtigung prüfen. Haben Sie beim Öffnen als Administrator ausgeführt? Klicken Sie mit der rechten Maustaste/als Administrator ausführen ...

Überprüfen Sie dann die Ordnerberechtigungen./properties/security/

0

WriteAllText wird nicht an die Datei anhängen. Sie müssen AppendAllText verwenden, um an die Datei anzuhängen. Stellen Sie außerdem sicher, dass sich die Datei nicht im Bearbeitungsmodus befindet, d. H. Von einem anderen Programm geöffnet/gesperrt wurde. Versuchen Sie den folgenden Code, es wird eine Fehlermeldung angezeigt, wenn es nicht anhängen kann. Die Fehlermeldung hilft Ihnen, das Problem zu lokalisieren und Sie können versuchen, es zu lösen.

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 
+0

Wirklich? Dies wurde als Duplikat markiert, aber die Leute ignorieren es und posten [Antworten, die bereits gegeben wurden] (http://stackoverflow.com/a/1613735/692942). – Lankymart

+0

es fragt mich, eine neue Datei erneut zu speichern, wenn ich auf meine Schaltfläche "Generieren" klicke und wenn ich auf die erste klicke, die ich bereits erstellt habe, will ich sie überschreiben, ich will nur einmal pro Sitzung fragen? –