echo ************************************************************ 

echo Setup param: 

echo ************************************************************ 

set __1c_path=C:\Program Files (x86)\1cv82\common\1cestart.exe

set __base_name=zup_msk

set __base_path=E:\Accounting\Staff\zup_msk

set __upload_path=D:\Backup1C

set __username=Backup

set __password=123420

echo ******************

echo Create folder:

echo ******************

md "%__upload_path%\%__base_name%" 

echo ************************************************************ 

echo Create backup: 

echo ************************************************************ 

"%__1c_path%" config /Out"%__upload_path%\%__base_name%\%__base_name%.log" /F"%__base_path%" /N"%__username%" /P"%__password%" /DumpIB"%__upload_path%\%__base_name%\%__base_name%-%date%.dt"    

 echo ************************************************************ 

echo Setup param: 

echo ************************************************************ 

set __1c_path=C:\Program Files (x86)\1cv82\common\1cestart.exe

set __base_name=crm

set __base_path=server1C\db_crm

set __upload_path=D:\Backup1C

set __username=Backup

set __password=123420

echo ******************

echo Create folder:

echo ******************

md "%__upload_path%\%__base_name%" 

echo ************************************************************ 

echo Create backup: 

echo ************************************************************ 

"%__1c_path%" config /Out"%__upload_path%\%__base_name%\%__base_name%.log" /S"%__base_path%" /N"%__username%" /P"%__password%" /DumpIB"%__upload_path%\%__base_name%\%__base_name%-%date%.dt"    

 

// Предваряющий код

// Место, где необходимо сделать паузу и съесть твикс )

// И, чтобы пользователь сильно не волновался вывести красивое окно с картинкой

//...

Если ФлажокИспользоватьПаузуМеждуДокументами Тогда

	Форма = ПолучитьФорму("ФормаПаузы");

	Форма.ПараметрФормы = ДлительностьПаузы;

	Форма.ОткрытьМодально();

КонецЕсли; 

//...

// Продолжить выполнение кода

   

 

// Молуль формы "ФормаПаузы"

// В реквизитах формы создаем новый с названием ПараметрФормы к который при открытии передадим период задержки



Процедура ЗакрытиеФормыОбработки()

	ЭтаФорма.Закрыть();	

КонецПроцедуры



Процедура ПриОткрытии()

	ПодключитьОбработчикОжидания("ЗакрытиеФормыОбработки", ПараметрФормы);

КонецПроцедуры

   

 

Предупреждение("Пауза...", ДлительностьПаузы); 

   

 //Самый простой и доступный способ - использовать диалог "Предупреждение"

// с заданным в качестве параметра необходимым таймаутом:

Предупреждение("Пауза!",60);

// или

Если Вопрос("Перепроведение?", РежимДиалогаВопрос.ОКОтмена, 60) = КодВозвратаДиалога.Отмена Тогда

   Возврат;

КонецЕсли;   

 // А если мы не хотим выводить пользователю ни каких сообщений

// Установим паузу в 5 минут, т.е. 300 секунд

сек = 300;

КонДата = ТекущаяДата() + сек;

  Пока ТекущаяДата() < КонДата Цикл

      // ждемссс....

  КонецЦикла;

   

 Процедура глПауза(Сек)

scr = Новый COMОбъект("WScript.Shell");

scr.Run("sleep "+СокрЛП(Число(Сек)),0,1);

КонецПроцедуры;   

 Процедура глПауза(Сек)

    scr = СоздатьОбъект("WScript.Shell");

    scr.Run("sleep "+СокрЛП(Число(Сек)),0,1);

КонецПроцедуры;