It's a bit of a tight situation on indexing, Mike. How about this

LengthReturned = LEN(filename)
ShortName = Substr(filename,1,(LengthReturned-4))
MemoFileName = ShortName+".FTP"

Then I can use Copy File. It seems to do the job. I'll give it a try this way.

Thanks