Renaming File Extensions from .log to .txt

[thomsons]

I'm currently writing a VBA Macro from within MS Access 2000 where I wish to rename all the files in a directory from having the file extension .log into .txt files prior to importing into an Access Database

I'm unsure as to whether or not this can be done - any assistance would be greatly appreciated

Cheers,
S.

 

[KenReay]

Hi

In VBA Code

something like (not tested)

FileName = Dir (*.Log)
Do Until FileName = ""
rename filename as left(filename,len(filename)-3) & ".txt"
filename = Dir
next Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -

http://www.kenneth.reay.btinternet.co.uk

UK

 

[thomsons]

Cheers for that Ken - if you change the rename to just name then it works beautifully

name filename As Left(filename, Len(filename) - 3) & "txt"


Thanks,
S.