Just a note about Close .. This works in 2007 R1 and R2

   dim f as FolderItem = DesktopFolder.child("test.txt")
   dim WriteToFile as TextOutputStream
   dim s as string =  "helloƖ"

   if f <> nil then
     WriteToFile = f.CreateTextFile
     if WriteToFile <> nil then
       WriteToFile.Write( s )
       WriteToFile.Close
       WriteToFile.Write("HJJJA")<<<-- not written
     else
       MsgBox("error!")
     end if
   end if ' nil


But there is perhaps other reasons to not use it, this was only a test..

Sven E


_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to