[vb8] salva

[zeno96]

ciao a tutti ho appena finito di fare un editor di testo simile al blocco note ma non riesco a fare il salva!!! per il salva con nome ho usato il IO system
vorrei che una volta aperto o salvato con nome un nuovo file cliccando su salva mi salvi appunto le modifiche apportate !!!

[Pirelli72]

Posta il codice che hai scritto fin'ora.

[zeno96]

intendi quello del salva con nome???

[Pirelli72]

Tutto quello che potrebbe servire per risolvere il problema.

[zeno96]

questo è il salva con nome
Private Sub MenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem5.Click
SaveFileDialog1.Filter = ("File di testo (*.txt)|*.txt")
SaveFileDialog1.FileName = ""
SaveFileDialog1.ShowDialog()
Dim ww As New IO.StreamWriter(SaveFileDialog1.FileName)
ww.Write(TextBox1.Text)
ww.Close()

End Sub

[Pirelli72]

Fai la stessa cosa, con la differenza che al posto della proprietà :

SaveFileDialog1.FileName

utilizzerai una variabile in cui avrai memorizzato il percorso del file all'apertura o nel caso in cui sia stato creato apri invece il 'Salva con nome'

Esempio:

 Dim myPath As String

    Private Sub Salva_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If myPath = String.Empty Then
            Button2_Click(Button2, New System.EventArgs)
        Else
            Dim ww As New IO.StreamWriter(myPath)
            ww.Write(TextBox1.Text)
            ww.Close()
        End If     
    End Sub

    Private Sub SalvaConNome_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        SaveFileDialog1.Filter = ("File di testo (*.txt)|*.txt")
        SaveFileDialog1.FileName = ""
        If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.Cancel Then Exit Sub
        Dim ww As New IO.StreamWriter(SaveFileDialog1.FileName)
        ww.Write(TextBox1.Text)
        ww.Close()
        myPath = SaveFileDialog1.FileName
    End Sub