Сохраните файл .txt в специальном формате

Question

Мне нужно знать, как сохранить файл .txt из моей программы Visual Basic 2010 и сохранить его в специальном формате.

мне нужно, чтобы спасти как "monday:email@email.com" & "4/22/2013:email@email.com".

Как бы это сделать?

Я использую Visual Basic 2010.

И есть 2 ListBoxes, которые должны быть сохранены, как это тоже. "listbox1info:listbox2info".

Мне нужно обновить мою программу ASAP.

Как добиться этого?

Мой код:

Public Class Form1 
    Dim streamer As IO.StreamReader 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
     OpenFileDialog1.ShowDialog() 
     ListBox1.Text = OpenFileDialog1.FileName 
    End Sub 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
     streamer = IO.File.OpenText(ListBox1.Text) 
     Dim mystring() As String = streamer.ReadToEnd.Split(vbNewLine) 
     ListBox1.Items.AddRange(mystring) 
    End Sub 

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
     OpenFileDialog1.ShowDialog() 
     TextBox2.Text = OpenFileDialog1.FileName 
    End Sub 

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
     streamer = IO.File.OpenText(TextBox2.Text) 
     Dim mystring() As String = streamer.ReadToEnd.Split(vbNewLine) 
     ListBox2.Items.AddRange(mystring) 
    End Sub 
End Class 

Answer 1

Где этот понедельник и email@email.com от ?. В зависимости от того, что вы хотите, скорректируйте переменную strFileName поровну, скажем, текущий день, текущую дату, динамический адрес электронной почты, вытаскивающий из базы данных и т. Д .; в противном случае это будет делать

Dim strFileName As String = "" 
Dim strContent As String = "" 

strFileName = "monday:email@email.com" & "4/22/2013:email@email.com" & ".txt" 
strContent = "whatever you want" 

My.Computer.FileSystem.WriteAllText(strFileName, strContent, True)