i cant get this working at all
all it does is say it has illegal letters
all it does is say it has illegal letters
Code:
SaveFileDialog.Title = ("Save File")
SaveFileDialog.Filter = ("HTML (*.html*)|*.html*|HTM (*.htm*)|*.htm*|XHTML (*.xhtml*)|*.xhtml*|XML (*.xml*)|*.xml*|PHP (*.php*)|*.php*|PHP3 (*.php3*)|*.php3*|PHP4 (*.php4*)|*.php4*|PHTML (*.phtml*)|*.phtml*|ASP (*.asp*)|*.asp*|ASPX (*.aspx*)|*.aspx*")
Me.SaveFileDialog.ShowDialog()
Dim oFile As System.IO.File
Dim oWrite As System.IO.StreamWriter
oWrite = oFile.CreateText(SaveFileDialog.FileName & "." & SaveFileDialog.Filter)
oWrite.WriteLine(TextBox.Text)
oWrite.Close()