I would have to guess, since you do not say, that this folder is semi/constantly having files added. I think the first time you run DIR it takes something like a snap shot of the files in the directory, and then on each new dir() give you the next. The problem is, if you keep adding files, it has no idea you have added them. Eventually, it runs out of files and the While $FileName <> "" kicks it out of the loop. I think since you are moving the files, a quick fix is to just change this line

$FileName = Dir()
to this:
$FileName = Dir($lokal + "*.br*")

You might consider adding some logging to see exactly what it is doing, and also maybe using DIRPlus() found here on the board.
_________________________
(... better days ahead)