Batch: betimmte Verzeichnisse in Schleife ignorieren

for /f "Delims=" %%i in ('dir /s /b /ad ^|findstr /v "converted"') do echo %%i  

@echo off
setlocal EnableDelayedExpansion
for /f "Delims=" %%i in ('dir /s /b /ad ^|findstr /v "converted"') do (  
  set AKTUELLER_SUCHPFAD=%%~i
  echo !AKTUELLER_SUCHPFAD!
)

@echo off
for /f "Delims=" %%i in ('dir /s /b /ad ^|findstr /v "converted"') do call :MeineFunktion "%%i"  
goto :EoF

:MeineFunktion
set AKTUELLER_SUCHPFAD=%~1
echo %AKTUELLER_SUCHPFAD%

@echo off
for /f "Delims=" %%a in ('dir /s /b /ad ^| findstr /v "converted"') do (  
  echo "Aktueller Pfad: %%a"  
  for %%b in ("%%~a\*") do call :MachWas "%%~b"  
)
goto :EoF

:MachWas
REM  Hier folgt nun dein Code.
REM  Variable "%1" enthält die  
REM  einzelnen Dateien

@echo off
set Quellpfad=C:\Pfad\zum\Quellordner

REM Alle Ordner namens "JPG" im Quellpfad finden, ausgenommen Pfade namens "converted" oder "_aussortiert"  
for /f "Delims=" %%A in ('dir /s /b /ad "%Quellpfad%\JPG" ^| findstr /i /v "converted _aussortiert"') do (  

  REM  Für jede ARW-Datei im übergeordneten Verzeichnis: Wenn keine gleichnamige JPG-Datei vorhanden
  for %%B in ("%%~dpA*.arw") do if not exist "%%~A\%%~nB.jpg" call :keineJPG "%%~B"  

  REM  Für jede JPG-Datei im Ordner: Wenn keine ARW-Datei im übergeordneten Ordner vorhanden
  for %%B in ("%%~A\*.jpg") do if not exist "%%~dpA%%~nB.arw" call :keineARW "%%~dpA" "%%~B"  
  )
  
)
pause
goto :EoF

:keineJPG
  REM  Verzeichnis "_aussortiert" erstellen, falls nicht vorhanden  
  set Zielpfad=%~dp1
  set Zielpfad=%Zielpfad:~0,-1%_aussortiert
  if not exist "%Zielpfad%" (  
    echo Erstelle Verzeichnis: "%Zielpfad%"  
    mkdir "%Zielpfad%"  
  )
  
  REM  ARW-Datei verschieben
  echo Verschiebe Datei: "%~1" => "%Zielpfad%"  
  1>nul move "%~1" "%Zielpfad%\"  
goto :EoF

:keineARW
  REM  Verzeichnis "_aussortiert\jpg" erstellen, falls nicht vorhanden  
  set Zielpfad=%~1
  set Zielpfad=%Zielpfad:~0,-1%_aussortiert\jpg
  if not exist "%Zielpfad%" (  
    echo Erstelle Verzeichnis: "%Zielpfad%"  
    mkdir "%Zielpfad%"  
  )
  
  REM  JPG-Datei verschieben
  echo Verschiebe Datei: "%~2" => "%Zielpfad%"  
  1>nul move "%~2" "%Zielpfad%\"  

dir /s /b /ad "C:\Test\JPG"  

dir /s /b /ad "%Quellpfad%\JPG*"  

  echo Verschiebe Datei: "%~1" => "%Zielpfad%"  

  echo Verschiebe Datei: "%~1" =^> "%Zielpfad%"  

Erstelle Verzeichnis: "C:\Pfad\zum\Quellordner\2022-02_aussortiert"
Verschiebe Datei: "C:\Pfad\zum\Quellordner\2022-02\Dateiname.ARW.xmp" => "C:\Pfad\zum\Quellordner\2022-02_aussortiert"

REM  Für jede XMP-Datei im übergeordneten Verzeichnis: Wenn keine gleichnamige JPG-Datei vorhanden
  for %%B in ("%%~dpA*.xmp") do (  
    for %%C in ("%%~nB") do if not exist "%%~A\%%~nC.jpg" call :keineJPG "%%~B"  
  )

$Quellpfad = "C:\Pfad\zum\Quellordner"  

# Wenn Konsolenfenster kleiner als 75 pixel, auf 75 setzen
if ([Console]::WindowWidth -lt 75) {[Console]::WindowWidth = 75}

# Bei Fehlern, Skript abbrechen (Sprung in Catch-Block)
$ErrorActionPreference = 'stop'  
try {
  # Für jeden Ordner Namens JPG, dessen Pfad nicht "converted" oder "_aussortiert" enthält 
  $Files = Foreach ($dir in Get-ChildItem -Recurse -Directory "$Quellpfad\jpg" | ? Fullname -NotMatch "converted|_aussortiert") {  
    # Liste alle JPG-Dateien auf, zu der keine ARW-Datei im übergreifenden Ordner existiert
    Get-ChildItem -File "$($dir.Fullname)\*.jpg" | ? {!(Test-Path ("{0}\{1}.arw" -f $dir.Parent.Fullname,$_.BaseName))}  
    # Liste jede ARW oder XMP Datei, zu der keine JPG-Datei im übergreifenden Ordner existiert
    Get-ChildItem -File "$($dir.Fullname)\*" -Include "*.arw","*.xmp" | ? {!(Test-Path ("{0}\{1}.jpg" -f $dir.Parent.Fullname,($_.BaseName -Replace "\d*(\.ARW)?$")))}  
  }
  
  # Gruppiere Dateien nach Übergreifenden Ordner mit "_aussortiert"-Suffix 
  Foreach ($Group in $Files | Group {$_.Directory.Parent.Fullname+"_aussortiert\JPG"}) {  
    # Wenn Ordner nicht existiert, erstellen
    if (!(Test-Path -PathType Container $Group.Name)) {
      Write-Host -N ('Erstelle Ordner:  {0,-52} ' -f $Group.Name)  
      [void](md -force $Group.Name)
      Write-Host -F Green "[ok]"  
    } else {Write-Host ('Ordner existiert: {0} ' -f $Group.Name)}  
    # Verschiebe Dateien
    Foreach ($File in $Group.Group) {
      Write-Host -N ('   ''-->   {0,-60} ' -f $File.Name)  
      move -Path $File -Destination $Group.Name
      Write-Host -F green "[ok]"  
    }
    ""  
  }
  Foreach ($i in 5..1) {
    Write-Host -f green -N ("`r---   Alles erledigt. Wird beendet in {0,2} Sekunden.  ---" -f $i)  
    sleep 1
  }
} catch {
  # Fehlermeldung ausgeben und anhalten
  Write-Host -F red $_.Exception.Message
  Write-Host -N "---   Beliebige Taste zum Beenden   ---"  
  [void][console]::ReadKey($true)
}

Set-ExecutionPolicy RemoteSigned -Force

Set-ExecutionPolicy -Scope CurrentUser RemoteSigned -Force

Set-ExecutionPolicy -Scope MachinePolicy Undefined -Force
Set-ExecutionPolicy RemoteSigned -Force

gpedit.msc

"__DSC00814___.ARW.xmp","__DSC00814___01.ARW.xmp","__DSC00815___01.ARW.xmp","__DSC00815___.ARW","__DSC00816___.jpg" |%{ni -force "C:\Test\2023-02\jpg\$_"}  
ni -force "C:\Test\2023-02\__DSC00814___.jpg"  

C:\Test
  └───2023-02
      │   __DSC00814___.jpg
      │
      └───jpg
            __DSC00814___.ARW.xmp
            __DSC00814___01.ARW.xmp
            __DSC00815___.ARW
            __DSC00815___01.ARW.xmp
            __DSC00816___.jpg

  $Files = Foreach ($dir in Get-ChildItem -Recurse -Directory $Quellpfad -Filter "jpg" | ? Fullname -NotMatch "converted|_aussortiert") {  

$Quellordner = "S:\test2\2021-06"  

# Funktion zum aussorieren der Dateien
  Function Aussortieren {
    [CmdletBinding()]Param([Parameter(Mandatory,ValueFromPipeline)][IO.FileInfo[]]$File)
    BEGIN   {$Files = @()}
    PROCESS {$Files += $File}
    END     {
      Foreach ($Group in $Files | Group {$_.DirectoryName -Replace "(?=\\jpg$)|(?<!\\jpg)$","_aussortiert"}) {  
        # Wenn Ordner nicht existiert, erstellen
        if (!(Test-Path -PathType Container $Group.Name)) {
          Write-Host -N ('Erstelle Ordner:  {0,-52} ' -f $Group.Name)  
          [void](md -force $Group.Name)
          Write-Host -F Green "[ok]"  
        } else {Write-Host ('Ordner existiert: {0} ' -f $Group.Name)}  
        # Verschiebe Dateien
        Foreach ($File in $Group.Group) {
          Write-Host -N ('     └-->   {0,-58} ' -f $File.Name)  
          move -Force -Path $File -Destination $Group.Name
          Write-Host -F green "[ok]"  
        }
        ""  
      }
    }
  }

# GUI-Modul laden
  Add-Type -A System.Windows.Forms
  [Windows.Forms.Application]::EnableVisualStyles()

# Modul, um Konsolenfenster zu verstecken / anzuzeigen
  $window = Add-Type -MemberDefinition "[DllImport(""user32.dll"")]`npublic static extern bool ShowWindow(IntPtr hWnd, int nCmdShow);" -name "Win32ShowWindowAsync" -namespace Win32Functions -PassThru  
  $Handle = (PS -Id $PID).MainWindowHandle
  [Void]$window::ShowWindow($Handle, 0)

# Fensterelemente
  $Form = [Windows.Forms.Form]@{Text='Bilder löschen'; StartPosition='CenterScreen'; Size="100,100"; FormBorderStyle='FixedSingle'; AutoSize=$true; Margin='10,10,10,10'; KeyPreview=$true; Font=[Drawing.Font]::New("Microsoft Sans Serif",12,[Drawing.FontStyle]"Bold")}  
  $FlowPanel = [Windows.Forms.FlowLayoutPanel]@{FlowDirection='TopDown'; AutoSize=$true; Dock='Fill'; Padding='10,10,10,10'}  
  $Buttons = @(
    [Windows.Forms.Button]@{Name='JPG'; Text='JPG und XMP';      Size="250,60"; TabIndex=1; Margin='10,10,10,10'}  
    [Windows.Forms.Button]@{Name='ARW'; Text='ARW und XMP';      Size="250,60"; TabIndex=2; Margin='10,10,10,10'}  
    [Windows.Forms.Button]@{Name='All'; Text='JPG, ARW und XMP'; Size="250,60"; TabIndex=0; Margin='10,10,10,10'}  
  )

# Fenster zusammenfügen
  $FlowPanel.Controls.AddRange($Buttons)
  $Form.Controls.Add($FlowPanel)
  
# Eventhandler
  
  # Bei Buttonklick, Fenstertag auf Buttontext setzen und Fenster schließen
    $Buttons.Add_Click({
      $this.TopLevelControl.Tag = $this.Name
      $this.TopLevelControl.Hide()
    })
  
  # Tastatursteuerung aktivieren: Escape="Abbrechen", 1="Option 1", 2="Option 2", 3="Option 3" 
    $Form.Add_KeyDown({
      switch -Regex ($_.KeyCode) {
        "^Escape$" {$this.Hide()}  
        "^(D|Numpad)1$" {$This.Controls.Controls["JPG"].PerformClick();break}  
        "^(D|Numpad)2$" {$This.Controls.Controls["ARW"].PerformClick();break}  
        "^(D|Numpad)3$" {$This.Controls.Controls["ALL"].PerformClick();break}  
      }
    })

  # Beim laden des Fensters
    $Form.Add_Load({
      # Ordnerliste laden
      Add-Member -Inp $this NoteProperty "Dirs"  (Get-ChildItem -Recurse -Directory $Quellordner -Filter "JPG" | ? FullName -NotMatch 'converted|_aussortiert')  
    })

# Ausführung

  # Bei Fehlern, Skript stoppen (Sprung in Catch-Block)
  $ErrorActionPreference = 'stop'  
  try {
    [void]$Form.ShowDialog()
    $Files = @()
    switch -r ($Form.Tag) {
      "ALL|JPG" {  
        Foreach ($dir in $Form.dirs) {
          Foreach ($file in Get-ChildItem -File "$($dir.FullName)\*.jpg" | ?{!(Test-Path "$($dir.Parent.Fullname)\$($_.BaseName).arw")}){  
            $Files += $file
            $Files += Get-ChildItem "$($File.DirectoryName)\$($File.BaseName)*.xm?"  
          }
        }
      }
      "ALL|ARW" {  
        Foreach ($dir in $Form.dirs) {
          Foreach ($File in Get-ChildItem "$($dir.Parent.Fullname)\*.arw"|?{!(Test-Path "$($dir.Fullname)\$($_.BaseName).jpg")}) {  
            $Files += $File
            $Files += Get-ChildItem "$($File.DirectoryName)\$($File.BaseName)*.xm?"  
          }
        }
      }
      "ALL|ARW|JPG" {  
        $Files += Foreach ($dir in $Form.Dirs) {
          Get-ChildItem "$($dir.Parent.Fullname)\*.xm?" |?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -Replace "(?<=_)\d*(\.arw)?").arw")}  
          Get-ChildItem "$($dir.Fullname)\*.xm?" |?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -Replace "(?<=_)\d*(\.jpg)?").jpg")}  
        }
        if ($Files) {Aussortieren $Files}
        break
      }
      $Null {Return}
      Default                                       {throw "Falscher Wert im Fenstertag"}  
    }
    [void]$window::ShowWindow($Handle, 1)
    
    Foreach ($i in 5..1) {
      Write-Host -f green -N ("`r---   Alles erledigt. Wird beendet in {0,2} Sekunden.  ---" -f $i)  
      sleep 1
    }
  }
  # Bei Fehlern, Meldung ausgeben und Skript anhalten
  catch {
    [void]$window::ShowWindow($Handle, 1)
    Write-Host -F red $_.Exception.Message
    Write-Host -N "---   Beliebige Taste zum Beenden   ---"  
    [void][console]::ReadKey($true)
  }

... -replace "\d*(\.ARW)?$"  

ls -r -file "C:\Pfad\zum\Quellordner" | select -Expand Fullname  

... ?{!(Test-Path ("$($dir.Parent.Fullname)\$($_.BaseName+"*.arw*")"))}}  

          Write-Host -N ('     └-->   {0,-58} ' -f $File.Name)  

Foreach ($Dir in Get-ChildItem -Path "S:\test2\2021-06" -Filter "JPG") {  
  Foreach ($File in Get-ChildItem $Dir.Fullname -Filter "*.jpg" | ?{!(Test-Path "$($Dir.Parent.Fullname)\$($_.BaseName)*.arw")}) {  
    $File.Fullname
    (Get-ChildItem $Dir.Fullname -Filter (($File.Basename -Replace '(?<=\d)_*?$')+"*.xmp")).Fullname  
  }
}

Foreach ($Dir in Get-ChildItem -Recurse -Path "S:\test2\2021-06" -Filter "JPG" |? FullName -NotMatch "_aussortiert|converted") {  
  Foreach ($File in Get-ChildItem $Dir.Fullname -Filter "*.jpg" | ?{!(Test-Path "$($Dir.Parent.Fullname)\$($_.BaseName)*.arw")}) {  
    $File.Fullname
    (Get-ChildItem $Dir.Fullname -Filter (($File.Basename -Replace "(?<=^\d{4}-\d{2}-\d{2}-__A\d+)_.*$")+"*.xmp")).Fullname  
  }
}

2022-05-28-__A7304628____.ARW
2022-05-28-__A7304628__Irgend-ein-Text__01.ARW.xmp

Foreach ($Dir in Get-ChildItem -Recurse -Path "S:\test2\2021-06" -Filter "JPG" |? FullName -NotMatch "_aussortiert|converted") {  
  Foreach ($File in Get-ChildItem $Dir.Fullname -Filter "*.jpg" | ?{!(Test-Path "$($Dir.Parent.Fullname)\$($_.BaseName).arw")}) {  
    $File.Fullname
    (Get-ChildItem $Dir.Fullname -Filter ($File.Basename+"*.xmp")).Fullname  
  }
}

Foreach ($Dir in Get-ChildItem -Recurse -Path "S:\test2\2021-06" -Filter "JPG" |? FullName -NotMatch "_aussortiert|converted") {  
  Foreach ($File in Get-ChildItem $Dir.Parent.Fullname -Filter "*.arw" | ?{!(Test-Path "$($Dir.Fullname)\$($_.BaseName).jpg")}) {  
    $File.Fullname
    (Get-ChildItem $Dir.Parent.Fullname -Filter ($File.Basename+"*.xmp")).Fullname  
  }
}

Foreach ($Dir in Get-ChildItem -Recurse -Path "S:\test2\2021-06" -Filter "JPG" |? FullName -NotMatch "_aussortiert|converted") {  
  (Get-ChildItem $Dir.Parent.FullName -Filter "*.xmp"|?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -replace '\d*(?=\.arw$)')")}).Fullname  
  (Get-ChildItem $Dir.FullName        -Filter "*.xmp"|?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -replace '\d*(?=\.jpg$)')")}).Fullname  
}

# Datei in Variable speichern
$File = Get-Item "S:\test2\2021-06\2021-06-02-__A7305881____.ARW.xmp"  

# Änderungsdatum der Datei anzeigen
$File.LastWriteTime

$File | Get-Member

$File | Select *

"2021-06-02-__A7305881____01.ARW" -Replace "\d*(?=\.arw$)"  

$Quellordner = "S:\test2\2021-06"  

# Funktion zum aussorieren der Dateien
  Function Aussortieren {
    [CmdletBinding()]Param([Parameter(Mandatory,ValueFromPipeline)][IO.FileInfo[]]$File)
    BEGIN   {$Files = @()}
    PROCESS {$Files += $File}
    END     {
      Foreach ($Group in $Files | Select -Unique | Group {$_.DirectoryName -Replace "(?=\\jpg$)|(?<!\\jpg)$","_aussortiert"}) {  
        # Wenn Ordner nicht existiert, erstellen
        if (!(Test-Path -PathType Container $Group.Name)) {
          Write-Host -N ('Erstelle Ordner:  {0,-52} ' -f $Group.Name)  
          [void](md -force $Group.Name)
          Write-Host -F Green "[ok]"  
        } else {Write-Host ('Ordner existiert: {0} ' -f $Group.Name)}  
        # Verschiebe Dateien
        Foreach ($File in $Group.Group) {
          Write-Host -N ('     └-->   {0,-58} ' -f $File.Name)  
          move -Force -Path $File.Fullname -Destination $Group.Name
          Write-Host -F green "[ok]"  
        }
        ""  
      }
    }
  }

# GUI-Modul laden
  Add-Type -A System.Windows.Forms
  [Windows.Forms.Application]::EnableVisualStyles()

# Modul, um Konsolenfenster zu verstecken / anzuzeigen
  $window = Add-Type -MemberDefinition "[DllImport(""user32.dll"")]`npublic static extern bool ShowWindow(IntPtr hWnd, int nCmdShow);" -name "Win32ShowWindowAsync" -namespace Win32Functions -PassThru  
  $Handle = (PS -Id $PID).MainWindowHandle
  [Void]$window::ShowWindow($Handle, 0)

# Fensterelemente
  $Form = [Windows.Forms.Form]@{Text='Bilder löschen'; StartPosition='CenterScreen'; Size="100,100"; FormBorderStyle='FixedSingle'; AutoSize=$true; Margin='10,10,10,10'; KeyPreview=$true; Font=[Drawing.Font]::New("Microsoft Sans Serif",12,[Drawing.FontStyle]"Bold")}  
  $FlowPanel = [Windows.Forms.FlowLayoutPanel]@{FlowDirection='TopDown'; AutoSize=$true; Dock='Fill'; Padding='10,10,10,10'}  
  $Buttons = @(
    [Windows.Forms.Button]@{Name='JPG'; Text='JPG und XMP';      Size="250,60"; TabIndex=1; Margin='10,10,10,10'}  
    [Windows.Forms.Button]@{Name='ARW'; Text='ARW und XMP';      Size="250,60"; TabIndex=2; Margin='10,10,10,10'}  
    [Windows.Forms.Button]@{Name='All'; Text='JPG, ARW und XMP'; Size="250,60"; TabIndex=0; Margin='10,10,10,10'}  
  )

# Fenster zusammenfügen
  $FlowPanel.Controls.AddRange($Buttons)
  $Form.Controls.Add($FlowPanel)
  
# Eventhandler
  
  # Bei Buttonklick, Fenstertag auf Buttontext setzen und Fenster schließen
    $Buttons.Add_Click({
      $this.TopLevelControl.Tag = $this.Name
      $this.TopLevelControl.Hide()
    })
  
  # Tastatursteuerung aktivieren: Escape="Abbrechen", 1="Option 1", 2="Option 2", 3="Option 3" 
    $Form.Add_KeyDown({
      switch -Regex ($_.KeyCode) {
        "^Escape$" {$this.Hide()}  
        "^(D|Numpad)1$" {$This.Controls.Controls["JPG"].PerformClick();break}  
        "^(D|Numpad)2$" {$This.Controls.Controls["ARW"].PerformClick();break}  
        "^(D|Numpad)3$" {$This.Controls.Controls["ALL"].PerformClick();break}  
      }
    })

  # Beim laden des Fensters
    $Form.Add_Load({
      # Ordnerliste laden
      Add-Member -Inp $this NoteProperty "Dirs"  (Get-ChildItem -Recurse -Directory $Quellordner -Filter "JPG" | ? FullName -NotMatch 'converted|_aussortiert')  
    })

# Ausführung

  # Bei Fehlern, Skript stoppen (Sprung in Catch-Block)
  $ErrorActionPreference = 'stop'  
  try {
    [void]$Form.ShowDialog()
    $Files = @()
    switch -r ($Form.Tag) {
      "ALL|JPG" {  
        $Files += Foreach ($Dir in $Form.Dirs) {
          Foreach ($File in Get-ChildItem $Dir.Fullname -Filter "*.jpg" | ?{!(Test-Path "$($Dir.Parent.Fullname)\$($_.BaseName).arw")}) {  
            $File
            Get-ChildItem $Dir.Fullname -Filter ($File.Basename+"*.xmp")  
          }
        }
      }
      "ALL|ARW" {  
        $Files += Foreach ($Dir in $Form.Dirs) {
          Foreach ($File in Get-ChildItem $Dir.Parent.Fullname -Filter "*.arw" | ?{!(Test-Path "$($Dir.Fullname)\$($_.BaseName).jpg")}) {  
            $File
            Get-ChildItem $Dir.Parent.Fullname -Filter ($File.Basename+"*.xmp")  
          }
        }
      }
      "ALL|ARW|JPG" {  
        $Files += Foreach ($Dir in $Form.Dirs) {
          Get-ChildItem $Dir.Parent.FullName -Filter "*.xmp"|?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -replace '\d*(?=\.arw$)')")}  
          Get-ChildItem $Dir.FullName        -Filter "*.xmp"|?{!(Test-Path "$($_.DirectoryName)\$($_.BaseName -replace '\d*(?=\.jpg$)')")}  
        }
        if ($Files) {Aussortieren $Files}
        break
      }
      $Null {Return}
      Default                                       {throw "Falscher Wert im Fenstertag"}  
    }
    [void]$window::ShowWindow($Handle, 1)
    
    Foreach ($i in 5..1) {
      Write-Host -f green -N ("`r---   Alles erledigt. Wird beendet in {0,2} Sekunden.  ---" -f $i)  
      sleep 1
    }
  }
  # Bei Fehlern, Meldung ausgeben und Skript anhalten
  catch {
    [void]$window::ShowWindow($Handle, 1)
    Write-Host -F red $_.Exception.Message
    Write-Host -N "---   Beliebige Taste zum Beenden   ---"  
    [void][console]::ReadKey($true)
  }