Help with appending text file -VB 2005

[tonyflora63]

Hi

I'm trying to append a text file with the following code:

Dim tw As System.IO.TextWriter
tw = System.IO.File.CreateText("D:\host.txt")
tw.WriteLine(t_HostName.text)
tw.Flush()
tw.Close()

This is what I get in the text file:

frh001wa2555655
f
fr
frh
frh0
frh00
frh001
frh001w
frh001wa
frh001wa2
frh001wa26
frh001wa261
frh001wa2613
frh001wa26135
frh001wa261351
frh001wa2613519

Thanks

Tony

 

[tonyflora63]

Exscuse me this is the code:

Dim tw As System.IO.TextWriter
tw = System.IO.File.AppendText("D:\host.txt")
tw.WriteLine(t_HostName.text)
tw.Flush()
tw.Close()