counting files that were copied

[Stuempi]

Hi there,

I have a neat little script which copies files from A to B.

The amount of files is variable frfom time to time and I now want to add a msgbox which count's the number of files which were copied. Any idea?

I didn't find a way in the help files or when searching the board here...

[Xenobiologist]

Hi,

search for copywithprogress

;Copy with Progressbar
#Include <File.au3>

_copyProgress("C:\Downloads\Fotos\Frisur\", 'C:\Downloads\Fotos\Frisur\Test\', '*.jpeg')

Func _copyProgress($From_dir, $Dest_dir, $filter = '*.*')
    Local $count = 0, $dir = ""
    $FileList = _FileListToArray($From_dir, $filter, 0)
    If(Not IsArray($FileList)) And(@error = 1) Then SetError(-1)
    ProgressOn("Copy", "Files :", "0 files")
    For $i = 1 To UBound($FileList) - 1
        If FileGetAttrib($FileList[$i]) = "D" Then $dir = "\*.*"
        If FileCopy($From_dir & "\" & $FileList[$i] & $dir, $Dest_dir & "\", 9) Then
            $count += 1
            ProgressSet($count * 100 / $FileList[0], _
                    "From: " & $From_dir & "\" & @LF & "To: " & $Dest_dir & "\" & @LF & $FileList[$i], _
                    StringFormat('%05.2f', Round(($count * 100 / $FileList[0]), 2)) & " % " & @TAB & $count & "/" & $FileList[0] & " Done")
        EndIf
        Sleep(100); to see what happens
    Next
    ProgressSet(100, "Done", "Complete")
    Sleep(500)
    ProgressOff()
    Return 1
EndFunc  ;==>_copyProgress

Mega

[Stuempi]

Thanks mate! I will test this