Applescript:从文件名获取周数

时间:2013-07-18 15:29:51

标签: applescript

我的智能手机上有很多照片。所有这些文件的格式都是yyyy-mm-dd hh:mm:ss.jpg

我需要根据周数将它们分类到文件夹中。

使用AppleScript将文件移动到文件夹时没有问题:)我也没有定义给定日期的周数的问题。我有一个问题(我认为)有语法甚至数据类型,但我无法理解问题所在。

这是我正在使用的。

  1. 我有一个定义给定日期的周数的功能
  2. 我浏览了我的文件夹并将所有名字都列入了列表
  3. 我解析名称以获得yyyy,mm和dd作为变量
  4. 然后我尝试使用这些变量调用我的函数 - 这就是问题开始的地方。
  5. 请查看我的代码示例:

    property DBFolder : "Macintosh HD:Users:lyubovberezina:Dropbox:DB"
    property CUFolder : "Macintosh HD:Users:lyubovberezina:Dropbox:Camera Uploads"
    
    on weekNumber(_inputDate)
    
    script Week_Number_Extras
    
        on dateOfFirstWeekOfYear(_year)
            -- Get Monday of first week number
            set _date to current date
            set year of _date to _year
            set month of _date to 1
            set day of _date to 1
            set time of _date to 0
    
            -- Get the first Thursday of this year
            repeat until weekday of _date is Thursday
                set _date to _date + (24 * 60 * 60)
            end repeat
    
            -- Return the Monday before
            set _date to _date - (3 * 24 * 60 * 60)
    
            return _date
        end dateOfFirstWeekOfYear
    
    end script
    
    -- Make a copy of the passed date object to avoid changes to the original
    copy _inputDate to _targetDate
    
    -- Reset the time and go back to Monday
    set time of _targetDate to 0
    repeat until weekday of _targetDate is Monday
        set _targetDate to _targetDate - (24 * 60 * 60)
    end repeat
    
    -- Get the date of the first week for the current year and the next one
    tell Week_Number_Extras
        set _matchDate to dateOfFirstWeekOfYear(year of _targetDate)
        set _nextYearsFirstWeekDate to dateOfFirstWeekOfYear((year of _targetDate) + 1)
    end tell
    
    -- Exit early, if the current week is the first one of next year
    if _targetDate = _nextYearsFirstWeekDate then return 1
    
    -- Count up until the target date is reached
    set _weekNumber to 1
    repeat until _targetDate = _matchDate
        set _matchDate to _matchDate + (7 * 24 * 60 * 60)
        set _weekNumber to _weekNumber + 1
    end repeat
    
    return _weekNumber
    end weekNumber
    
    tell application "Finder"
    set this_folder to folder CUFolder
    set this_list to every file of this_folder
    repeat with i in this_list
        set fileName to name of i
        set fileYear to characters 1 thru 4 of fileName as string
        set fileMonth to characters 6 thru 7 of fileName as string
        set fileDay to characters 9 thru 10 of fileName as string
    end repeat
    end tell
    
    set theNewDate to date (fileMonth & "/" & fileDay & "/" & fileYear)
    weekNumber(theNewDate)
    

    在这种情况下,行

    set theNewDate1 to date (fileMonth & "/" & fileDay & "/" & fileYear)
    

    工作正常(我的意思是,没有错误),但因为它在循环之外,它只给出循环中最后一个图像的结果。 但是如果我将它移动到循环中则会出错:

    property DBFolder : "Macintosh HD:Users:lyubovberezina:Dropbox:DB"
    property CUFolder : "Macintosh HD:Users:lyubovberezina:Dropbox:Camera Uploads"
    
    on weekNumber(_inputDate)
    
    script Week_Number_Extras
    
        on dateOfFirstWeekOfYear(_year)
            -- Get Monday of first week number
            set _date to current date
            set year of _date to _year
            set month of _date to 1
            set day of _date to 1
            set time of _date to 0
    
            -- Get the first Thursday of this year
            repeat until weekday of _date is Thursday
                set _date to _date + (24 * 60 * 60)
            end repeat
    
            -- Return the Monday before
            set _date to _date - (3 * 24 * 60 * 60)
    
            return _date
        end dateOfFirstWeekOfYear
    
    end script
    
    -- Make a copy of the passed date object to avoid changes to the original
    copy _inputDate to _targetDate
    
    -- Reset the time and go back to Monday
    set time of _targetDate to 0
    repeat until weekday of _targetDate is Monday
        set _targetDate to _targetDate - (24 * 60 * 60)
    end repeat
    
    -- Get the date of the first week for the current year and the next one
    tell Week_Number_Extras
        set _matchDate to dateOfFirstWeekOfYear(year of _targetDate)
        set _nextYearsFirstWeekDate to dateOfFirstWeekOfYear((year of _targetDate) + 1)
    end tell
    
    -- Exit early, if the current week is the first one of next year
    if _targetDate = _nextYearsFirstWeekDate then return 1
    
    -- Count up until the target date is reached
    set _weekNumber to 1
    repeat until _targetDate = _matchDate
        set _matchDate to _matchDate + (7 * 24 * 60 * 60)
        set _weekNumber to _weekNumber + 1
    end repeat
    
    return _weekNumber
    end weekNumber
    
    tell application "Finder"
    set this_folder to folder CUFolder
    set this_list to every file of this_folder
    repeat with i in this_list
        set fileName to name of i
        set fileYear to characters 1 thru 4 of fileName as string
        set fileMonth to characters 6 thru 7 of fileName as string
        set fileDay to characters 9 thru 10 of fileName as string
        set theNewDate to date (fileMonth & "/" & fileDay & "/" & fileYear)
        weekNumber(theNewDate)
    end repeat
    end tell
    

    在第一个文件被拿走后,错误被给予:

    get name of document file "2013-01-02 02.43.21.jpg" of folder "Camera Uploads" of folder "Dropbox" of folder "lyubovberezina" of folder "Users" of startup disk
        --> "2013-01-02 02.43.21.jpg"
    get date "01/02/2013"
        --> error number -1728 from date "01/02/2013"
    Result:
    error "Finder got an error: Can’t get date \"01/02/2013\"." number -1728 from date "Wednesday, January 2, 2013 12:00:00 AM"
    

    我几乎是Applescript中的全新手,所以我无法理解为什么代码在循环外工作而不在循环内工作。对此事我感激不尽。

    非常感谢!

2 个答案:

答案 0 :(得分:1)

至少对于周数部分使用shell脚本可能更容易:

do shell script "date -jf %F 2013-07-19 +%V"

cd ~/Dropbox/Camera\ Uploads; for f in *; do d=../DB/$(date -jf %F ${f:0:10} +%Y-%V "$f"); mkdir -p $d; mv "$f" $d; done

答案 1 :(得分:0)

你应该坚持原来的格式:

set theNewDate to current date
set theNewDate's year to fileYear
set theNewDate's month to fileMonth
set theNewDate's day to fileDay

此外:

将_date设为_date +(24 * 60 * 60)
与。相同 将_date设为_date + days

将_date设为_date - (3 * 24 * 60 * 60)
是相同的 将_date设为_date - (3 *天)

将_matchDate设为_matchDate +(7 * 24 * 60 * 60)
与。相同 将_matchDate设置为_matchDate +周