using code from http://www.autoitscript.com/wiki/Recursion (with minor mods to show progress/errors)
Local $folder = FileSelectFolder("select folder", "")
Local $size = DirGetSize($folder, 1)
ConsoleWrite("size of the directory is " & $size[0] & @CRLF & "file count is " & $size[1] & @CRLF & "directories is " & $size[2] & @CRLF)
Global $counter
ListFiles_Iterative($folder)
Func ListFiles_Iterative($sSourceFolder)
Local $sFile
; Force a trailing \
If StringRi