Perfect Article for a person (like me) starting to dip into DTS. Thanks.

Needed 1 change to be able to delete the files:

Change line: arrFileList(intX) = objFile = intX + 1

to

arrFileList(intX) = objFile

intX = intX + 1

Code worked when I changed it to VB6 module but there was an error on line 63: set startingKey = arrFileList(i)

Error message for the job: Object required: '[string: "C:\Books\asp.net.pdf"]'

No Problem in VB is used the File Object here. It might be just me??

Thanks again - I learned a lot