need help with scriipt or Dos bat file 2

[DougP]

I want to move a file that has the same name every week but have the new file renamed with date added to file name when moved
File name is backup.bkf on c: drive and new files name would be backup041007.bkf if it happened today.

using robocopy on Windows Server 2003
Example
robocopy c:\ d:\ *.bkf ?????

any help appreciated


DougP, MCP, A+

 

[dm4ever]

Maybe like this...

Option Explicit
'On Error Resume Next

Dim srcFile : srcFile = "c:\temp\backup.bkf"
Dim dstFile : dstFile = "d:\temp\backup" & GetDate & ".bkf"
Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFile srcFile, dstFile

Function GetDate
	Dim arrTemp : arrTemp = Split(Date, "/")
	Dim i, strTemp, strOutput
	For i = 0 To UBound(arrTemp)
		strTemp = arrTemp(i)
		If Len(strTemp) = 1 Then
			strOutput = strOutput & "0" & strTemp
		ElseIf Len(strTemp) = 4 Then
			strOutput = strOutput & Mid(strTemp, 3)
		Else
			strOutput = strOutput & strTemp
		End If
	Next
	GetDate = strOutput
End Function

--------------------------------------------------------------------------------
dm4ever
My philosophy: K.I.S.S - Keep It Simple Stupid

 

[xwb]

If you want a DOS batch

set dd=%date:~4,2%
set mm=%date:~7,2%
set yy=%date:~10,4%
ren backup.bkf backup%dd%%mm%%yy%.bkf
robocopy ...

Type set /? for more info on set. It is more versatile than the one on DOS6..Win98

 

[xwb]

Oops: just realized you have US date format and I have done it in UK format. Maybe you have to check what %DATE% gives you before using the DOS version.

 

[DougP]

thank you both

DougP, MCP, A+