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

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)

- - [решено] ArchName сделать формата "гггг.мм.дд" (http://forum.oszone.net/showthread.php?t=221451)

ArchName сделать формата "гггг.мм.дд"

Доброго времени суток. Есть такой скрипт для создания резервной копии базы. В программировании не силен. Помогите допилить, чтобы имя файлика с бекапом было в формате гггг.мм.дд.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)

Код:

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

Результат

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