Creazione file txt

di il
1 risposte

Creazione file txt

Buonasera a tutti, stasera sono incappato in un problema tanto banale quanto delirante (almeno per me), dal momento che non ne esco. Vi spiego in parole povere il problema. Ho la necessita di verificare se un determinato file .txt esiste o no, se esiste semplicemente scriverci all'interno un testo, invece se non esiste voglio che venga creato e succesivamente che vi venga scritto un testo all'interno. A dirlo ho pensato "alquanto banale" ma successivamente mi dice che una volta creato non posso scriverci all'interno perchè è già in uso . A questo punto chiedo il vostro prezioso aiuto.

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


        Dim testonota As String
        Dim notatxt As String = "C:\Users\Diego\Desktop\prova.txt"


        If My.Computer.FileSystem.FileExists(notatxt) Then

            Dim scri As StreamWriter

            testonota = TextBox1.Text
            scri = New StreamWriter(notatxt)

            scri.WriteLine(testonota)
            scri.Close()
            MsgBox("Salvato")
        Else

            File.Create(notatxt)
            GoTo RILEGGI
        End If
        

1 Risposte

  • Re: Creazione file txt

    Butta il codice soprattutto quell'orrendo goto e utilizza direttamente lo streamwriter
Devi accedere o registrarti per scrivere nel forum
1 risposte