Have access rename a .txt file and move it

[dh010010]

Afternoon!

I currently have a database that creates a .txt file which contains information from one of my tables.



I need access, after it has written the file, to rename if from a .txt file to a .xml

I have already looked at exporting as an .xml but the xml file does not come out right and only work as I am doing presently.

Is there any way I can get access to change the .txt to .xml?

Any help would be great.

[SoftwareMatters]

You can use Name to rename a file like this:
Path = Filepath
If Dir(Path & Name.txt, vbDirectory) <> "" Then
Name Path &Name.txt As Path & Name.xml
end if

[dh010010]

thanks for that it worked a treat!

Just have one more question /

Is there any way i can use %userprofile% in the code.

The problem is that i need the file to rename and move to another location however the location is different for each user (because of there user name).

Any ideas how I would get round this?

[SoftwareMatters]

I saw this the other day that might be useful but have not tested it.
http://www.ehow.com/how_4753053_vba-...-username.html

[dh010010]

Thanks for the quick reply.

Unfortunatly I can already do what the link is showing, which is to get the user name.

How do i explain this.......

I want to be able to save the file to:

%userprofile%\application data\idonk\data\MYFILE.xml

the %userprofile% bit is not understood by access when saving a file it wants be to put

c:\documents and settings\myusername\application data\idonk\data\MYFILE.xml

but "myusername" will change with each user.

The %userprofile% (if you type it in run) auto takes you to the current users files.

Any further ideas..... sorry if this does not make sense or i repeat myself, its been a long day!

[dh010010]

I DONE IT!


Just so you know....

the save location was like so.....

"C:\Documents and Settings\" & Environ("username") & "\application data\{FAB3AFF7-DA5E-431E-B81A-D94492775BCB}UpdateData.xml"