On Jul 30, 2006, at 7:06 PM, Lennox Jacob wrote:
Dim f As folderitem
Dim TOS As TextOutputStream
f = DesktopFolder.Child("myExpFile")
If f exists then
This should be 'If f.Exists Then' but don't use it as you don't care
as you will be creating a new one anyways.
If f <> Nil then
TOS = f.CreateTextFile
TOS.WriteLine FirstName.Text
TOS.WriteLine LastName.Text
TOS.WriteLine Age.Text
TOS.WriteLine Address.Text
TOS.Close
end if
That's it. Dump the rest (below code).
Tested and it works for me. :)
Terry
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
