Для отображения персонализированного контента и рекламных сообщений, а также хранения личных настроек на локальном компьютере веб-сайт www.vdgb.ru используют технологию cookie и аналогичные. Продолжив использование наших веб-сайтов, Вы даете согласие на обработку персональных данных, выражаете согласие с Политикой конфиденциальности www.vdgb.ru и применением этих технологий.

ПРОДАЖА И ВНЕДРЕНИЕ 1С

по всей России

Проконсультироваться
со специалистом 1С

Консультироваться

Код VBS
 Set Sh = CreateObject("WScript.Shell")
      
'Переиндексирую базу
Set oExec1 = Sh.Exec("""C:\Program Files\1Cv77\BIN\1cv7.exe"" CONFIG /d""C:\bases2005"" /nПрограммист /pXXXXX /@c:\bases2005\ExtForms\sys\Chk.txt")

'Дожидаюсь, пока она не отработает
Do While oExec1.Status = 0
WScript.Sleep 100
Loop

Set oExec1 = Nothing
WScript.Sleep 10000


Заказать обратный звонок

Позвонить
Отправлено! В самое ближайшее время наш менеджер свяжется с Вами.