>>>@ 0,1 say "Re-Name File: " get fln >>>READ >>>fln = rtrim(fln) >>>COPY FILE m.txt to c:\vaniermu\&fln >>>>>
>>fln = putfile('Rename File:',,'txt') >> >>if empty(justext(fln)) >> fln = forceext(fln, 'txt') >>endif >> >>copy file m.txt to ('c:\Vaniermu\' + justfname(m.fln))>
>>copy file m.txt to ('c:\Vaniermu\' + justfname(m.fln))into
>>copy file m.txt to ('c:\Vaniermu\' + m.fln)ie, take out justfname() which throws away the extension you just added