Серый форум — WSH: добавить дату к имени файла

Re: WSH: добавить дату к имени файла

null@example.com (smaharbA) — Thu, 26 Jan 2012 04:43:03 +0000

Или так даже

set x=new RegExp
x.Pattern="[^0-9]"
x.Global=true
msgbox(x.replace(date,""))

Re: WSH: добавить дату к имени файла

null@example.com (smaharbA) — Thu, 26 Jan 2012 04:09:17 +0000

лучше будет так как то

set x=new RegExp
x.Pattern="[^0-9]"
msgbox(replace(date,x.Execute(date)(0),""))

Re: WSH: добавить дату к имени файла

null@example.com (chichva) — Wed, 25 Jan 2012 14:58:31 +0000

Ну, что окончательный вариант:

Dim strRun
strRun="""C:\Program Files\1cv81\bin\1CV8.EXE"" CONFIG /S ""sql_hiper\dkp""/N ""Администратор""/P ""mikromax""/DumpIB ""F:\bac\dkp\DKP_Backup" & replace(date,".","") & ".dt"""                

Set WshShell=CreateObject("WScript.Shell")

ReturnCode=WshShell.Run(strRun)

Re: WSH: добавить дату к имени файла

null@example.com (chichva) — Wed, 25 Jan 2012 12:37:22 +0000

smaharbA пишет:

а чем к примеру replace(date,".","") не канает ?

Так я, только недавно за VBScript взялся, так сказать - разведка-боем.

Re: WSH: добавить дату к имени файла

null@example.com (smaharbA) — Wed, 25 Jan 2012 12:23:11 +0000

а чем к примеру replace(date,".","") не канает ?

Re: WSH: добавить дату к имени файла

null@example.com (Даурен) — Wed, 25 Jan 2012 11:24:29 +0000

Да,классный вариант, сработало! Спасибо огромное! Именно то что нужно и все грамотно работает.
Хотел chichva сказать спасибо не нашел где.
Надо бы форуму добавить систему спасибок пользователю.

Re: WSH: добавить дату к имени файла

null@example.com (chichva) — Wed, 25 Jan 2012 11:06:20 +0000

Может вот так:

Dim strRun

if  day(date) < 10 then strRun="0"
strF=strF & day(date) 

if  month(date) < 10 then strRun=strF & "0"
strRun=strRun & month(date) 

strRun=strRun & Year(date)
strRun="""C:\Program Files\1cv81\bin\1CV8.EXE"" CONFIG /S ""sql_hiper\dkp""/N ""Администратор""/P ""mikromax""/DumpIB ""F:\bac\dkp\DKP_Backup" & strRun & ".dt"""                

Set WshShell=CreateObject("WScript.Shell")

ReturnCode=WshShell.Run(strRun)

Re: WSH: добавить дату к имени файла

null@example.com (alexii) — Tue, 24 Jan 2012 12:57:20 +0000

Даурен, я написал правильный заголовок темы, перенёс в правильный раздел форума, оформил текст согласно Правилам форума, исправил более-менее орфографию, грамматику и стилистику.

В дальнейшем жду этого от Вас.

WSH: добавить дату к имени файла

null@example.com (Даурен) — Tue, 24 Jan 2012 11:43:53 +0000

Всем привет! Есть скрипт, который выгружает базу 1с и кладет ее в каталог. Но каждый раз, когда он кладет ее в каталог предыдущая копия базы затирается. На ум пришло, к имени базы прикреплять дату, но как это сделать не сообразил. Вот скрипт:

Set WshShell=CreateObject("WScript.Shell")

ReturnCode=WshShell.Run("""C:\Program Files\1cv81\bin\1CV8.EXE"" CONFIG /S ""sql_hiper\dkp""/N ""Администратор""/P ""mikromax""/DumpIB ""F:\bac\dkp\DKP_Backup.dt""")

В конструкции RUN cmd инструкция запуска базы и ее выгрузка в каталог. Сейчас при выгрузке выгружается файл вида F:\bac\dkp\DKP_Backup.dt и каждый раз идет перезатирание (скрипт запускается через «Назначенные задания»), а нужно чтобы было так:

F:\bac\dkp\DKP_Backup24012012.dt 
F:\bac\dkp\DKP_Backup25012012.dt

и т.д.

Спасибо!