Code:
  If Open(2, 'workfile.tmp')=0


Had to add '=0' at the end of that line. That did the trick.. Each file is now being processed. So far so good.

Jon
_________________________
I was placed on earth to do a job. Right now I have so much to do, I will never die..