Still exporting text, and a further question

Hi: I've been plugging away at exporting text from VB 2010. Moving right along, but now Im at the stage where I want to deliver a prompt to users to allow them to select or enter a filename. In short, I'm including a savefiledialog code with streamwriter code; I don't know where to insert the savefiledialog code. Below is what I have so far:

Dim objFile As New System.IO.StreamWriter(SaveFileDialog1, True)

SaveFileDialog1.Title = "Specify Desitination Filename"
SaveFileDialog1.Filter = "Text Files (*.txt)|*.txt"
SaveFileDialog1.FilterIndex = 1

objFile.WriteLine(RichTextBox1.Text)
objFile.Close()

Thanks in advance. Robert

RobertGeoff

Asked: 2013-01-01

Advertise Here

Visual Basic.NET

1 Solution

LVL 86

Mike TomlinsonMiddle School Assistant TeacherCommented: 2013-01-01

Use the ShowDialog() method and only save the file if "OK" is returned:

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        SaveFileDialog1.Title = "Specify Desitination Filename"
        SaveFileDialog1.Filter = "Text Files (*.txt)|*.txt"
        SaveFileDialog1.FilterIndex = 1

        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Using objFile As New System.IO.StreamWriter(SaveFileDialog1.FileName, True)
                objFile.WriteLine(RichTextBox1.Text)
            End Using
        End If
    End Sub

Open in new window

LVL 36

Miguel OzSoftware EngineerCommented: 2013-01-01

I will use WriteAllText instead of streaming the file. Replace lines 6 to 8 of previous post with:

System.IO.File.WriteAllText(SaveFileDialog1.FileName, RichTextBox1.Text)

RobertGeoffAuthor Commented: 2013-01-01

Thank you both for you help. The second modification offered returned an exception, however. Robert

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Expand your skills with this month's free Premium course.

Still exporting text, and a further question

Join & Write a Comment Already a member? Login.

Featured Post