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


«compares two folders selected in the Finder
«if it runs without errors, the two folder structures are identical in every way
local (list = findermenu.getselectionlist ())
on compareFolders (folder1, folder2)
local (f)
fileloop (f in folder1)
local (otheritem = folder2 + file.fileFromPath (f))
msg (otheritem)
if file.isFolder (f)
compareFolders (f, otheritem)
if not (f, otheritem)
scriptError ("Found problem at " + f)
dialog.alert (compareFolders (list [1], list [2]))

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