AppleScript的处理文件夹中的递归 [英] AppleScript Processing Files in Folders recursively
问题描述
我有一个根文件夹,也有它的子文件夹。它是通常只有一个水平,但它可以是更深。这些文件夹也会有不同的文件,包括一些 .rar程序
文件。我想创建一个递归函数横过文件夹,请检查该文件是一个RAR文件并打开/解压缩。在code正致力于一级带出什么问题。但递归调用不能正常工作和苹果脚本的错误处理是可怕的。这里是code这是我迄今所做的。
设置文件夹名来的Macintosh HD:用户:Teja公司:桌面:马杜巴布process_folder(,文件夹名)在process_folder(根,folderNameToProcess)
设置fileExt为{.rar程序}
告诉应用程序发现者
设置theItems到文件夹中的所有文件(根&安培; folderNameToProcess)
与theFile重复theItems
复制theFile的名字作为字符串文件名
在fileExt EXT重复
如果文件名以内线然后结束
开放theFile
删除theFile
万一
重复结束
重复结束
设置theFolders到文件夹的文件夹名称(根&安培; folderNameToProcess)
与theFolder重复theFolders
复制theFolder作为字符串TheFolderName
显示对话框(folderNameToProcess&安培; TheFolderName&放大器;)
尝试
process_folder(folderNameToProcess,TheFolderName&放大器;:)
在错误errStr号errorNumber
显示对话框errStr
年底试
重复结束
告诉结束
结束process_folder
试着改变你的递归调用
尝试
我的process_folder(folderNameToProcess,TheFolderName&放大器;:)
在错误errStr号errorNumber
显示对话框errStr
年底试
请注意在我的
的 process_folder
呼叫。这使得它为我工作。
I have a root folder and there are sub folders in it. It is generally one level only but it can be deeper. These folders will have different files including some .rar
files. I want to create a recursive function which traverses the folders, check if the file is a rar file and open/extract it. The code is working to first level with out any problem. But the recursive call is not working and apple script's error handling is horrible. Here is the code which I have done so far.
set folderName to "Macintosh HD:Users:Teja:Desktop:Madhu Babu:"
process_folder("", folderName)
on process_folder(root, folderNameToProcess)
set fileExt to {".rar"}
tell application "Finder"
set theItems to every file of folder (root & folderNameToProcess)
repeat with theFile in theItems
copy name of theFile as string to FileName
repeat with ext in fileExt
if FileName ends with ext then
open theFile
delete theFile
end if
end repeat
end repeat
set theFolders to name of folders of folder (root & folderNameToProcess)
repeat with theFolder in theFolders
copy theFolder as string to TheFolderName
display dialog (folderNameToProcess & TheFolderName & ":")
try
process_folder(folderNameToProcess, TheFolderName & ":")
on error errStr number errorNumber
display dialog errStr
end try
end repeat
end tell
end process_folder
Try changing your recursive call to
try
my process_folder(folderNameToProcess, TheFolderName & ":")
on error errStr number errorNumber
display dialog errStr
end try
Note the my
before the process_folder
call. This made it work for me.
这篇关于AppleScript的处理文件夹中的递归的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!