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

---

samples.basicStuff.stuffChangedFiles

«Creates a StuffIt archive with all files changed in the last day

«you can call it from the Scheduler Suite to have it done every night at 2AM

local (lastbackupdate = clock.now () - (60 * 60 * 24))

local (archive = file.getSystemDisk () + "Desktop Folder:Changed Files.sit")

if file.exists (archive)

file.delete (archive)

StuffIt.launch ()

StuffIt.newArchive (archive, false)

StuffIt.bringToFront ()

fileloop (f in file.getSystemDisk (), infinity)

if f [not equal] archive «don't backup the archive itself!

if file.modified (f) > lastbackupdate

StuffIt.stuffItem (f)

StuffIt.closeArchive (archive)

StuffIt.quit ()

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