AutoHotkey Community

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
File1 := "C:\Docs\DatabaseExport.csv"
Folder2 := "C:\Docs\Folder2"
Folder3 := "C:\Docs\Folder3"
    Loop, Read, %File1%
   {
    IfExist, %Folder2%\%A_LoopFilename%
    FileCopy , %Folder2%\%A_LoopFilename% , C:\Docs\Folder3 ,1
   Break
   }

FileRead, File1 , %File1%

     
Loop, Parse, File1, `n, `r
{
    DbFileName:= A_LoopField
   
   MsgBox , 4 , , this is in text file %DbFileName%
    IfMsgBox , No
   Return
    Loop , C:\Docs\Folder3\*.* , 0
    {
        MsgBox , 4 , , the filename is %DbFileName%
        Folder3_FileName = %A_LoopFileName%
      MsgBox , 4 , , thats the filename is %Folder3_FileName%
      StringTrimLeft , New_Folder3_FileName , Folder3_FileName , 9
      ;If DbFileName Contains %Folder3_FileName%
      ;ListVars
      StringReplace , New_Name , New_Folder3_FileName , %New_Folder3_FileName% , %DbFileName% , All
      ListVars
      
      
      
    }
   
         
      
       
}

#NoEnv
#SingleInstance force
SetWorkingDir %A_ScriptDir%
SetBatchLines, -1 ; At end of init set to 0.

; Settings
csv_file := "C:\Docs\DatabaseExport.csv"    ; Database with the new file names.
source_folder := "C\Docs\Folder2"           ; Place of the source photos.
destination_folder := "C:\Docs\Folder3"     ; Where to copy the files.

; CSV file content is expected like this:
/*
220011001,jane doe
220011002,john doe
*/

; File names in source folder are expected like this:
/*
220011001.jpg
220011002.jpg
*/

; Processing
FileCreateDir, %destination_folder%
Loop, Read, %csv_file%
{
    ; A_LoopReadLine contains in example "220011001,jane doe".
    Loop, Parse, %A_LoopReadLine%, CSV
    {
        ; If A_Index is "1", then A_LoopField contains in example "220011001".
        FileCopy, %source_folder%\%A_LoopField%.jpg, %destination_folder%\%A_LoopReadLine%.jpg, 1
        Continue ; First entry is needed, not more.
    }
}

Loop, Parse, %A_LoopReadLine%, CSV

Loop, Parse, A_LoopReadLine, CSV

#NoEnv
#SingleInstance
SetWorkingDir %A_ScriptDir%
SetBatchLines, -1 ; At end of init set to 0.

; Settings
csv_file := "C:\Docs\DatabaseExport.csv"    ; Database with the new file names.
source_folder := "C:\Docs\Folder2"           ; Place of the source photos.
destination_folder := "C:\Docs\Folder3"     ; Where to copy the files.

; CSV file content is expected like this:
/*
220011001,jane doe
220011002,john doe
*/

; File names in source folder are expected like this:
/*
220011001.jpg
220011002.jpg
*/

; Setup Folders
FileSelectFile, csv_file, , %csv_file%, Which file contains the names?, CSV files (*.csv)
FileSelectFolder, source_folder, %source_folder%, 1, Where are the photos?
FileSelectFolder, destination_folder, %destination_folder%, 1, Where to copy the files?
FileCreateDir, %destination_folder%

; Processing
Loop, Read, %csv_file%
{
    line := A_LoopReadLine
    ; A_LoopReadLine contains in example "220011001,jane doe".
    Loop, Parse, line, CSV
    {
        ; If A_Index is "1", then A_LoopField contains in example "220011001".
        FileCopy, %source_folder%\%A_LoopField%.jpg, %destination_folder%\%line%.jpg, 1
        Break ; First entry is needed, not more.
    }
}