Part of the Samples Website. 8/16/97.


«Helps out the Finder when it can't empty the trash
«I was getting a "Too Many Nested Folders" error from the Finder.
«This script was able to empty the trash without the error...
«It's nested within a "try" so that it doesn't get stop running if it encounters
«a busy file, or some other wierdness (this is likely, because the Finder was
«having a problem...).
«DW 11/10/93
local (vol, f, trashfolder)
fileloop (vol in "")
trashfolder = vol + "Trash:"
fileloop (f in trashfolder)
if file.isFolder
file.deleteFolder (f)
file.delete (f)

This page was last built on Sat, Aug 16, 1997 at 6:39:34 PM. You can download the current set of sample scripts from our FTP site. Dave