[решено] ArchName сделать формата "гггг.мм.дд"

[ipvinner]

Доброго времени суток. Есть такой скрипт для создания резервной копии базы. В программировании не силен. Помогите допилить, чтобы имя файлика с бекапом было в формате гггг.мм.дд.dt
Date дает мм.дд.гггг. Вот скрипт
Set WshShell = WScript.CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStreamL = FSO.CreateTextFile("D:\BackUpbaza\lostarch.txt")
ArchName = "D:\BackUpbaza\!!Main\BackUp_" + Replace(Date, "/","") + "_" + Replace(Time, ":","") + ".dt"
ArchName = Replace(ArchName," ","")
TextStreamL.Write(ArchName)
TextStreamL.Close
WshShell.run("C:\PROGRA~2\1cv82\8.2.13.205\bin\1cv8.exe config /UCКодРазрешения /Slocalhost\1cv82 /DumpIB" + ArchName)

[Iska]

dtNow = Now()

ArchName = "D:\BackUpbaza\!!Main\BackUp_" & _
Right("0000" & CStr(Year(dtNow)), 4) & "." & _
Right("00" & CStr(Month(dtNow)), 2) & "." & _
Right("00" & CStr(Day(dtNow)), 2) & ".dt"

WScript.Echo ArchName
D:\BackUpbaza\!!Main\BackUp_2011.11.25.dt

[ipvinner]

Спасибо. Все работает!