On Jul 30, 2006, at 10:16 PM, Lennox Jacob wrote:

OK,
This works

Only if you're lucky.  Here is some code that doesn't depend on luck.

dim f as FolderItem = DesktopFolder.Child("foo")
If f is nil then //something went wrong
  Return
End if

dim t as TextOutputStream = f.AppendToTextFile
If t is nil then
  //check f.LastErrorCode
  Return
End if
t.WriteLine "foo"
t.WriteLine "foo"
t = nil //the file is closed when the object is destroyed

FolderItem.AppendToTextFile creates the file if one does not already exist; presumably CreateTextFile fails if the file already exists.

Charles Yeomans


_______________________________________________
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>

Reply via email to