on deleteFile whatFile
if objectP(myFile) then set myFile = 0 -- Delete the instance if it already exists
set myFile = new(xtra "fileio") -- Create and instance of FileIO
if the moviePath = "" then --
alert "No moviePath. Please save your movie and try again."
else
openFile (myFile, the moviepath& whatFile,0) -- Open the file
delete (myFile) -- Delete 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
Contact
MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA