This seems incorrect - just prior to the "Loop" statement:
 Code:
$sFile=Dir()Split(GetFileTime($iSourceDir+$sFile))[0]
likely a result of an errant paste operation. Change it to
 Code:
$sFile=Dir()
This shouldn't harm anything, but will likely result in strange screen output.

Glenn
_________________________
Actually I am a Rocket Scientist! \:D