Sorry, there was an extra line in there: "put the getCommentAS" of me
into tAScript...that shouldn't be there.
on mouseUp
repeat with i = 1 to the number of lines of fld "fldData" -- a
field that contain a list of file names
put line i of fld "fldData" into ancienNomdefichier -- old name
put "tell application" && quote & "Finder" & quote & cr into
tAScript
put "get comment of file" && quote & revMacFromUnixPath
(ancienNomdefichier) & quote & cr after tAScript
put "end tell" after tAScript
do tAScript as applescript
put the result into commentaire
put line i of fld "fldDatacodées" into nouveauNomdefichier --
new name
rename file ancienNomdefichier to nouveauNomdefichier -- don't
need "do"
put "tell application" && quote & "Finder" & quote & cr into
tAScript
put "set comment of file" && quote & revMacFromUnixPath
(nouveauNomdefichier) & quote && "to" && commentaire & cr after tAScript
put "end tell" after tAScript
do tAScript as applescript
end repeat
end mouseUp
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
