循环多个目录 AHK

Question

我需要从几个目录中获取.csv 文件列表，我现在有这个脚本，我只需要添加更多目录，这完全可以吗？

FileList := "File FullPath,Base name,TimeLastModified"
Loop, \DEFRA1SPDB054\Exports\*.*,0,1
If SubStr(A_LoopFileTimeCreated, 1, 8) = SubStr(A_Now, 1, 8) ;
{
  FormatTime, last_time_modified, %A_LoopFileTimeModified%, MM/dd/yyyy HH:mm:ss
  FileList .= "`n" . A_LoopFileFullPath . "," . A_LoopFileName . "," . last_time_modified
}
FileAppend,%FileList%,FileList.csv
Run, excel.exe "FileList.csv"

Answer 1

假设我正确理解了你的问题，你可以这样做，例如：

folders := "
(
C:\Users\User\Documents\My Cool Folder1
C:\Users\User\Documents\My Cool Folder2
C:\Users\User\Documents\My Cool Folder3
C:\Users\User\Documents\My Cool Folder4
)"

FileList := "File FullPath,Base name,TimeLastModified"

for each, folder in StrSplit(folders, "`n", "`r")
{
    Loop, Files, % folder "\*.*", FR
    {
        if (SubStr(A_LoopFileTimeCreated, 1, 8) = SubStr(A_Now, 1, 8))
        {
            FormatTime, last_time_modified, % A_LoopFileTimeModified, % "MM/dd/yyyy HH:mm:ss"
            FileList .= "`n" A_LoopFileFullPath "," A_LoopFileName "," last_time_modified
        }
    }
}

FileAppend, % FileList, % "FileList.csv"
Run, % "excel.exe ""FileList.csv"""

我只是简单地在字符串 folders 中定义了一些文件夹（使用延续部分^(docs)), and then looped through each folder passing the folder into a file loop^(docs).

此外，我从您的脚本中删除了旧版 syntax/commands。
例如，您使用了已弃用的文件循环，或者通过遗留 %variable% 等引用变量

循环多个目录 AHK

Looping several directories AHK

autohotkey