Little bug:

About line 116

code:

if @error <> 0 and vartype($fso) <> 9 exit(@error) endif

I am about to start using the object handle function...

cj