限制对液滴

Question

文件类型

这个问题并不局限于谁知道AppleScript的，如果你这样做可可等，你应该知道这个问题的答案的人：

我做液滴在的AppleScript压缩JavaScript文件，显然，我只希望JavaScript文件被允许进入脚本。有任何想法吗？

非常感谢。

Answer 1

property kJavascriptExtension : "js" 
property pValidFileList : {} 

on open of theFiles -- Executed when files are dropped on the script 

    set fileCount to (get count of items in theFiles) 

    repeat with thisFile from 1 to fileCount 
     set theFile to item thisFile of theFiles 
     set theFileAlias to theFile as alias 

     tell application "Finder" 
      set fileInfo to info for theFileAlias 
      set fileName to name of fileInfo 
     end tell 

     set javascriptFileFound to isJavascriptFile(fileName) of me 

     if (javascriptFileFound) then 
      set end of pValidFileList to theFile 
     end if 
    end repeat 

    display dialog "pValidFileList = " & pValidFileList 
    -- do something with your files here 
end open 

on isJavascriptFile(theFilename) -- (theFilename as string) as boolean 
    set AppleScript's text item delimiters to "." 
    set fileNameList to every text item of theFilename 
    set AppleScript's text item delimiters to "" 

    try 
     set theFileExtension to item 2 of fileNameList as string 
    on error 
     return false 
    end try 

    if theFileExtension is kJavascriptExtension then 
     return true 
    end if 

    return false 
end isJavascriptFile