Jeez - this simple test of the logic works just fine:
 Code:
Break On

$Src = 'C:\Temp\'

$File = Dir($Src + '*.*')			; get all files AND folders that contain a dot from $Src folder

While Not @ERROR
  If Not (GetFileAttr($Src + $File) & 16)	; exclude files with attribute bit 5 (Val=16) set
    'File: ' $File ?				; display the file
  EndIf
  $File = Dir()					; get the next filename
Loop
I needed to create a folder with a dot in it to fully test the logic, otherwise other folders were always ignored.

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