Giant File Rename

SetWorkingDir E:\giant\
;Sleep 2000
acc = 0
Loop, *.*, 0, 1
{
    StringSplit thisFolder, A_LoopFileDir, \
    if thisFolder1 <> %lastFolder1%
        TrayTip New unit, Now working in %A_LoopFileDir% (File number %A_Index%`, %acc% changed)
    if A_LoopFileName in Thumbs.db,.DS_Store
        continue
    if A_LoopFileExt =
    {
        FileMove %A_LoopFileFullPath%, %A_LoopFileFullPath%.eml
        acc++
    }
    StringSplit lastFolder, A_LoopFileDir, \
}
MsgBox done