Loop Files

指定したファイルやフォルダを1つずつ取得します。

Loop Files FilePattern , Mode

パラメータ

FilePattern

型：文字列

単一のファイルまたはフォルダの名前、または"C:\Temp\*.tmp"のようなワイルドカードパターンです。FilePatternは、絶対パスが指定されない場合、A_WorkingDirにあるとみなされます。

ワイルドカードとして、アスタリスクとクエスチョンマークの両方がサポートされています。ファイルのロング/ノーマル名または8.3ショート名のいずれかにパターンがある場合、一致することになります。

このパラメータが単一のファイルまたはフォルダ（すなわちワイルドカードなし）で、ModeにRが含まれる場合、指定されたファイル名が検索対象の複数のフォルダに現れると、複数の一致が検出されます。

259文字以上のパターンは、システムの制限（MAX_PATH）により、ファイルの検索に失敗する場合があります。この制限は、いくつかの条件を満たした上で、\\?\ ロングパスプリフィクスを使用することで回避することができます。

Mode

型：文字列

空白または省略された場合、ファイルのみが含まれ、サブディレクトリは再帰されません。それ以外の場合は、以下の文字を1つ以上指定してください：

• D = インクルードディレクトリ（フォルダ）。
• F = インクルードファイル。FとDの両方が省略された場合、ファイルは含まれるがフォルダーは含まれません。
• R = サブディレクトリ（サブフォルダ）に再帰します。FilePatternに一致する名前のサブフォルダだけでなく、すべてのサブフォルダに再帰的にアクセスします。Rが省略された場合、サブフォルダー内のファイルやフォルダーは含まれません。

Special Variables Available Inside a File Loop

The following variables exist within any file loop. If an inner file loop is enclosed by an outer file loop, the innermost loop's file will take precedence:

Loop Files, "C:\My Documents\Address List.txt"
    ShortPathName := A_LoopFileShortPath

備考

A file loop is useful when you want to operate on a collection of files and/or folders, one at a time.

隠しファイルを含め、一致するすべてのファイルを取得します。これに対し、DIRコマンドなどのOSの機能は、デフォルトで隠しファイルを省略します。隠しファイル、システムファイル、読み取り専用ファイルの処理を避けるために、ループ内で以下のように使用します：

if A_LoopFileAttrib ~= "[HRS]"  ; H (Hidden), R (Read-only), S (System) のいずれかに該当するファイルをスキップします。~= operatorを参照。
    continue  ; このファイルをスキップして、次のファイルに移る。

To retrieve files' relative paths instead of absolute paths during a recursive search, use SetWorkingDir to change to the base folder prior to the loop, and then omit the path from the loop (e.g. Loop Files, "*.*", "R"). これにより、A_LoopFilePathには、ベースフォルダからの相対的なファイルのパスが含まれることになります。

A file loop can disrupt itself if it creates or renames files or folders within its own purview. 例えば、FileMoveなどでファイル名を変更した場合、そのようなファイルが2回見つかる可能性があります：旧名称ならば、新名称とします。これを回避するには、ファイルのリストを作成した後にのみファイル名を変更します。事例：

FileList := ""
Loop Files, "*.jpg"
    FileList .= A_LoopFileName "`n"
Loop Parse, FileList, "`n"
    FileMove A_LoopField, "renamed_" A_LoopField

NTFSファイルシステム内のファイルは、おそらく常にアルファベット順に検索されます。他のファイルシステムのファイルは、順不同で検索されます。特定の順序を確保するためには、以下の「例」のようにソート機能を使用します。

259文字より長いファイルパターンは、以下のうち少なくとも1つが成立している場合にのみサポートされます：

• ロングパスサポートが有効になっている（Windows 10 バージョン1607以降が必要）。
• \\?\ ロングパスプリフィックスを使用します（注意事項あり）。

それ以外の場合、259文字より長いファイルパターンは、ファイルやフォルダーを見つけることができません。この制限は、FilePatternと、サブフォルダへの再帰中に使用される一時的なパターンの両方に適用されます。

オプションで、オープンブレースを下ではなく同じラインに表示させるOTB（One True Brace）スタイルを採用することも可能です。事例：Loop Files "*.txt", "R" {.

Blocks、Break、Continue、A_Index変数（どのタイプのループにも存在する）については、「Loop」をご覧ください。

ループの後にElse文が続くことがありますが、これは一致するファイルやディレクトリが見つからなかった場合に実行されます（つまり、ループの反復回数がゼロの場合）。

The functions FileGetAttrib, FileGetSize, FileGetTime, FileGetVersion, FileSetAttrib, and FileSetTime can be used in a file loop without their Filename/FilePattern parameter.

関連

Loop, Break, Continue, Blocks, SplitPath, FileSetAttrib, FileSetTime

例

Loop Files, A_ProgramFiles "\*.txt", "R"  ; サブフォルダへの再検索。
{
    Result := MsgBox("Filename = " A_LoopFilePath "`n`nContinue?",, "y/n")
    if Result = "No"
        break
}

FolderSizeKB := 0
WhichFolder := DirSelect()  ; フォルダーを選んでもらいます。
Loop Files, WhichFolder "\*.*", "R"
    FolderSizeKB += A_LoopFileSizeKB
MsgBox "Size of " WhichFolder " is " FolderSizeKB " KB."

FileList := ""  ;空白になるように初期化します。
Loop Files, "C:\*.*"
    FileList .= A_LoopFileName "`n"
FileList := Sort(FileList, "R")  ; Rオプションは逆順にソートします。他のオプションはSortを参照。
Loop Parse, FileList, "`n"
{
    if A_LoopField = ""  ;リスト末尾の空白項目は無視します。。
        continue
    Result := MsgBox("File number " A_Index " is " A_LoopField ".  Continue?",, "y/n")
    if Result = "No"
        break
}

FileList := ""
Loop Files, A_MyDocuments "\Photos\*.*", "FD"  ; Include Files and Directories
    FileList .= A_LoopFileTimeModified "`t" A_LoopFileName "`n"
FileList := Sort(FileList)  ; Sort by date.
Loop Parse, FileList, "`n"
{
    if A_LoopField = "" ; リスト末尾のラインフィード（空白項目）を省略します。
        continue
    FileItem := StrSplit(A_LoopField, A_Tab)  ; タブ文字で2つに分割します。
    Result := MsgBox("The next file (modified at " FileItem[1] ") is:`n" FileItem[2] "`n`nContinue?",, "y/n")
    if Result = "No"
        break
}

CopyIfNewer(SourcePattern, Dest)
{
    Loop Files, SourcePattern
    {
        copy_it := false
        if !FileExist(Dest "\" A_LoopFileName)  ; 対象ファイルがまだ存在しない場合は常にコピーします。
            copy_it := true
        else
        {
            time := FileGetTime(Dest "\" A_LoopFileName)
            time := DateDiff(time, A_LoopFileTimeModified, "Seconds")  ; 送信元ファイルの時刻と送信先ファイルの時刻を引き算します。
            if time < 0  ;ソースファイルはデスティネーションファイルより新しい。
                copy_it := true
        }
        if copy_it
        {
            try
                FileCopy A_LoopFilePath, Dest "\" A_LoopFileName, 1   ;上書きコピー(Yes)
            catch
                MsgBox 'Could not copy "' A_LoopFilePath '" to "' Dest '\' A_LoopFileName '".'
        }
    }
}

for GivenPath in A_Args  ; 各パラメータ（またはスクリプトにドロップしたファイル）に対して：
{
    Loop Files, GivenPath, "FD"  ;ファイルやディレクトリをインクルードします。
        LongPath := A_LoopFilePath
    MsgBox "The case-corrected long path name of file`n" GivenPath "`nis:`n" LongPath
}