SaveFileDialog to save automatically

Code:

try
 Dim DBw As New StreamWriter("C:\ProgramData\OEMINFO.ini",
                                        False, System.Text.Encoding.UTF8)
            MySW.WriteLine("[General]")
            MySW.WriteLine("Manufacturer=" & oem_manufacturer.Text.ToString)
            MySW.WriteLine("Model=" & oem_model.Text.ToString & Environment.NewLine)
            MySW.WriteLine("[Support Information]")
            MySW.WriteLine("Line1=" & oem_support1.Text.ToString)
            MySW.WriteLine("Line2=" & oem_support2.Text.ToString)
            MySW.WriteLine("Line3=" & oem_support3.Text.ToString)
            MySW.Flush()
            MySW.Dispose()
            DBw.close
catch ex as exception
            messagebox.show(ex.message)
            DBw.Close()
end try

see if that works, it just uses a stream writer

 

np, i was just giving u an idea of what to do, i knew it wouldnt be perfect for u first time. glad u got it working