| |||
| [Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index] |
Le 16 oct. 2006 à 13:53, Jan Bultereys a écrit :
Hello Maybe this one may do the trick --[SCRIPT] (* define here the sourceFolder set sourceFolder to "xxxxxxxx:yyy:zzz:" *) set mainFolder to (path to documents folder) as text set destName to "Vendors_srodneV" tell application "Finder" if not (exists folder (mainFolder & destName)) then make new folder at folder mainFolder with properties {name:destName} end tell set destFolder to mainFolder & destName set theFiles to "BE_00097_M3200W BE_00158_M1370" if theFiles contains return then set delim to return else set delim to ASCII character 10 end if set oldDelim to AppleScript's text item delimiters set AppleScript's text item delimiters to delim set FilesNames to text items of theFiles set AppleScript's text item delimiters to oldDelim repeat with tt in FilesNames set tt to tt as text set ff to ((text 4 thru 6 of tt) as text) & "000_" & ((text 4 thru 7 of tt) as text) & "_Vendor_Code" (* -- Commented code because sourceFolder is not defined tell application "Finder" if not (exists folder destFolder & ff) then make new folder at folder destFolder with properties {name:ff} move file (sourceFolder & tt) to folder destFolder & ff end tell *) log tt & "*,*" & ff end repeat --[/SCRIPT] Yvan KOENIG |
_______________________________________________ Do not post admin requests to the list. They will be ignored. AppleScript-Users mailing list (email@hidden) Help/Unsubscribe/Update your Subscription: http://lists.apple.com/mailman/options/applescript-users/email@hidden This email sent to email@hidden
| References: | |
| >Move files to the right folder. (From: Jan Bultereys <email@hidden>) |
| Home | Archives | FAQ | Terms/Conditions | Contact | RSS | Lists | About |
Visit the Apple Store online or at retail locations.
1-800-MY-APPLE
Contact Apple | Terms of Use | Privacy Policy
Copyright © 2007 Apple Inc. All rights reserved.