Renaming a file

Question

Viewing 6 posts - 1 through 5 (of 5 total)

You must be logged in to reply to this topic. Login to reply

Jonathan Stokes SSCrazy Eights Points: 9861 More actions · Answer 1

Copyfile method is for moving files but keeping their original name.

Look into Copy method. See link:

------------------------------
The Users are always right - when I'm not wrong!

JonJon Say Hey Kid Points: 676 More actions · Answer 2

thanks for the help.

But this does the same thing I do. I need to append the system date to the file after I copy or move it.

Jonathan Stokes SSCrazy Eights Points: 9861 More actions · Answer 3

I think the problem is that you are trying to create an extension - .dash26/01/06.

Slashes are not allowed in filenames. Try formatting the date to remove slashes, dots etc...

------------------------------
The Users are always right - when I'm not wrong!

mike gercevich SSCrazy Points: 2961 More actions · Answer 4

sDestinationFile = "C:\activant\bkup\test.dash" & "-" & Year & Right( "0" & Month(Now), 2) & Right( "0" & Day(Now), 2)

This would give you the following result

test.dash-20060222

-Mike Gercevich

capa52 Newbie Points: 2 More actions · Answer 5

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2")

Set colFiles = objWMIService.ExecQuery _

("Select * from Cim_Datafile where Name = " _

& "'f:\\Backups\\NombreArchivoARenombrar.bkf'")

dim nombre

nombre = datepart("yyyy",now()) & datepart("m",now()) & datepart("d",now())

strDate = cstr(date())

For Each objFile in colFiles

errResult = objFile.Rename("f:\\Backups\\" & nombre & ".bkf")