Hi guys, I have the following lines in code with y textbox.text full of data. When trying to save this I get an access denied error. Any idea? Sub mnuFileSave_Click Savedialog.Filter = "Text files (*.txt)|*.txt" if fName = "" then Choice = savedialog.Show if Choice = cCancel then return else fName = Savedialog.File end if fileopen (F,fName,cWrite) s = txtbxData.Text filewrite (F,s) fileclose (F) End Sub
Hi, try this : Savedialog.Filter = "Text files (*.txt)|*.txt" if fName = "" then savedialog.Show fname = savedialog.file if fname = cCancel then return end if fileopen (F,fName,cWrite) s = txtbxData.Text filewrite (F,s) fileclose (F) End Sub It should work. Petr