Write Text to File Example

 

Compatibilities:

This item has not yet been rated

From Technote #3192 from Macromedia.com

on writeToFile     if objectP(myFile) then set myFile = 0 --Delete the instance if it already exists     set theFile = the text of field "myfield"  --  Put some text into a variable     set myFile = new(xtra "fileio")            --  Create an instance of FileIO     if the moviePath = "" then           alert "No moviePath!  Save your movie and try again." --  Make sure moviePath is NOT empty     else         createFile( myfile, the moviepath&"textfile.txt" )    --  Create the file         openFile( myFile, the moviepath&"textfile.txt",0)     --  Open the file with R/W access         setfinderinfo(myFile, "TEXT ttxt")  -- Make readable by SimpleText (Mac only)         writeString( myFile, theFile)              --  Write text to the file         alert "Status: "&error(myFile,status(myFile))         -- display error message       end if     closeFile (myFile)                         --  Close the file     set myFile = 0                             --  Dispose of the instance end