Did you try squirting data.files(1) into George's GetDosPath Function yet?
Just a suggestion I'm not testing here.