Rename a file ?

[alex_read]

I have not used VB for this before. I guess it's possible, but is there a property / method for renaming a file (I need it for the extension part really) - ie; rename file.doc to file.xls.

Thank you

[Michael Woolsey]

Try the Name command.

Name oldpathname As newpathname

Hope this helps.
Michael

[sebs]

Try

shell "Rename " & yourOldFile & " " & Left(yourOldFile,len(youOldFile)-4) & ".xls"

you can change Left(yourOldFile,len(youOldFile)-4) by
your function if you want,it's just to put your file
without the extention.

Or you just can use
FileCopy yourOldFile,yourNewFile
Kill yourOldFile

[alex_read]

ahhhhhh, thank you for that one, I was looking at change name, alter, ren, rename, everything but

[Jop]

Yeah I agree with Michael, use NAME, but be sure to include the whole directory with it:

Name "c:\mypath\myfile.ext" As "c:\mypath\myfile\mynewfile.ext"


so you can also use it to Move files.

Name "c:\file" As "c:\jop\file"

Have fun!

[HeSaidJoe]

Remeber, by changing the extension of a file you are not changing the type of the file and if you do something like this.

Private Sub Command1_Click()

    Dim sold As String, snew As String
    sold = "C:\my documents\MyWord.doc"
    snew = "C:\my documents\myword.xls"
    
    Name sold As snew

End Sub

..the result will be an unstable file

[alex_read]

Thank you HeSaidJoe. For this one, I realise this well raised point, but this program is for being devious.

I (like 99% of people methinks) get lots of jokes & pics in their e-mails which I forward. One of my mates companies have upgraded their firewalls though & this won't allow any files other than with MSOffice extensions through.

Solution - a great little program by Alex. I rename the file to .doc my end, send it through with note of what the extension should be.