4 berichten aan het bekijken - 1 tot 4 (van in totaal 4)
  • Q:
    Bijdrager
    MacMichael

    text vervangen in bestandsnaam mapactie

    Hallo allemaal.
    Wat betreft applescripting ben ik zo groen als gras, maar ik ben nu al een tijdje bezig om een mapactie te schrijven die bij het aan-de-map-toevoegen van een bestand “.jpg” verandert in “-thumb.jpg”.
    Er hoeven geen error-meldingen in opgenomen te worden, helemaal niets, alleen het vervangen van de extensie.
    Iemand die mij zou kunnen helpen bij het maken van dit scriptje? Ik weet dat het heel makkelijk kan zijn, maar ik kan er maar niet uitkomen.
    Dank je wel alvast!
    Michael

    Bijdrager
    Leander

    Zie deze link. Download “renamer.scpt”.

    When a file is added to a folder with Folder Actions enabled and this script enabled, it will rename the file from:
    filename.ext to filename-year-month-day.ext
    ex. graphic.jpg to graphic-2004-11-22.jpg

    Het script kan je makkelijk naar je eigen wensen aanpassen.
    Zoek in het script de coderegel:
    [code:1:4bd6f79db3]set appendStr to ("-" & myyear & "-" & mymonth & "-" & myday & "-" & mytime & "." & fileExt)
    [/code:1:4bd6f79db3]
    en vervang door:
    [code:1:4bd6f79db3]set appendStr to ("-thumb" & "." & fileExt)
    [/code:1:4bd6f79db3](of beter nog: laat de oude scriptregel gewoon staan en schakel ‘m uit door door er twee streepjes voor te zetten “–“)

    Hieronder staat het aangepaste script (de ongebruikte delen zou je nog kunnen weglaten):
    [code:1:4bd6f79db3]– Rename File with Current Date when adding to a folder
    — James E. Robinson, III
    — james<apenstaart>robinsonhouse<punt>com
    — http://www.robinsonhouse.com/

    — Description: when a file is added to a folder with Folder Actions enabled and this script enabled, it will rename the file from:
    — filename.ext to filename-year-month-day.ext
    — ex. graphic.jpg to graphic-2004-11-22.jpg
    — It will place the file in a sub-folder named "Stamped Images" by default, see properties below.

    — Acknowledgements: basic code copied from system default scripts, thanks Apple.

    — Known Bugs:
    — the script will process files without extensions, but will attempt to add an extension which will likely result with the wrong one

    — Unknown Bugs:
    — probably several

    — Where the renamed files wind-up
    property done_foldername : "Stamped Images"

    — the list of file types which will be processed
    property type_list : {"JPEG", "TIFF", "PNGf", "GIFf"}

    — since file types are optional in Mac OS X,
    — check the name extension if there is no file type
    — NOTE: do not use periods (.) with the items in the name extensions list
    property extension_list : {"jpg", "jpeg", "tif", "tiff", "png", "gif"}

    — begin Folder Action magic
    on adding folder items to thisFolder after receiving addedItems
    tell application "Finder"
    if not (exists folder done_foldername of thisFolder) then
    make new folder at thisFolder with properties {name:done_foldername}
    — my preference for viewing the sorted files
    set current view of container window of thisFolder to list view
    end if
    set the target_folder to folder done_foldername of thisFolder

    — process the added files
    repeat with i from 1 to number of items in addedItems
    set anItem to item i of addedItems
    set the item_info to the info for anItem
    — CHECK TO SEE IF THE ITEM IS AN IMAGE FILE OF THE ACCEPTED FILE TYPE
    if (alias of the item_info is false and the file type of the item_info is in the type_list) or (the name extension of the item_info is in the extension_list) then
    set oldDelims to AppleScript’s text item delimiters
    set AppleScript’s text item delimiters to {"."}
    — wiseman say "do not put renamed file back in same directory less you create loop"
    set the target_file to (move anItem to the target_folder with replacing) as alias
    try
    set fileName to name of target_file
    set lastMod to modification date of target_file

    set myyear to (year of lastMod as string)
    set mymonth to (month of lastMod as integer)
    set mymonth to mymonth as string
    set myday to (day of lastMod as string)
    set mytime to (time of lastMod as string)

    set fileExt to last text item of fileName
    set nameWithoutExtension to first text item of fileName
    –set appendStr to ("-" & myyear & "-" & mymonth & "-" & myday & "-" & mytime & "." & fileExt) –Leander: even uitgezet
    set appendStr to ("-thumb" & "." & fileExt)

    set newName to (nameWithoutExtension & appendStr)
    — finally, rename it
    set name of target_file to newName
    — this is probably overkill
    set AppleScript’s text item delimiters to oldDelims
    on error error_message number error_number
    set AppleScript’s text item delimiters to oldDelims
    if the error_number is not -128 then
    display dialog error_message buttons {"OK"} default button 1 giving up after 120
    end if
    end try
    end if
    end repeat
    end tell
    end adding folder items to[/code:1:4bd6f79db3]

    Succes

    Bijdrager
    MacMichael

    Leander,
    Duizend maal dank voor het helpen met mijn vraag. Het script was inderdaad goed aan te passen. Helaas kon ik niet eerder reageren door mijn werkzaamheden elders. Het script werkt perfect en hier en daar wil ik het nog iets perfectioneren, maar ik vind het echt super dat je me wilde helpen!!
    Nogmaals dank, Michael

    Bijdrager
    Leander

    Graag gedaan, ‘k heb er zelf ook wat aan gehad.

4 berichten aan het bekijken - 1 tot 4 (van in totaal 4)

Je moet ingelogd zijn om een reactie op dit onderwerp te kunnen geven.