Script for copying files to drop boxes of other Macs

Question

I don't know much about scripts as yet, but for daily backup purposes
I would like to copy all new or modified files from various folders
to the drop boxes of two other Macs (like the old DOS command XCopy)
and then reset the "modified attributes" (is there something like that at all?)
of these files.
A script could do this without the need to always find and select these files
and to always confirm the messages "You can put items into “Drop Box”,
but you won’t be able to see them. Do you want to continue?".
Thanks!

Answer 1

Here is a short skeleton which doesn't treat subfolders.
May you check if it do what you want ?
property sourceFolder : "/Users/home/Documents/Pages/current/"
property destFolder : "/cr1’s iMac.afpovertcp.tcp.local/cr1's%20Public%20Folder/Drop Box/backup/Documents/Pages/current/"
on run
tell application "System Events"
set dest_folder to path of folder destFolder
set listeSource to path of disk items of folder sourceFolder
repeat with sf in listeSource
if visible of disk item sf then
tell disk item sf
set sn to name
set smd to modification date
end tell
if exists disk item sn of folder destFolder then
set needCopy to modification date of disk item sn of folder destFolder is not smd
else
make new file at end of folder destFolder with properties {name:sn}
set needCopy to true
end if -- exists disk item
if needCopy then my copyFile(sf, dest_folder)
end if -- visible …
end repeat
end tell -- System Events
end run
on copyFile(sourceFile, targetFolder) (*
sourceFile is the path to the source file as text,
dest_folder is the path to the destination folder as text
newFileName is the name of the file as text
tell application "Finder"
duplicate file sourceFile to folder targetFolder with replacing
end tell
end copyFile
Yvan KOENIG (VALLAURIS, France) mercredi 16 décembre 2009 18:33:43