Автоматическая архивация баз данных 1С 8.2, 8.1 и 7.7

01.05.23

База данных - Архивирование (backup)

Автоматическая архивация баз данных 1С 8.2, 8.1 и 7.7 без установки дополнительного ПО. Удаление устаревших архивов, дублирование ежемесячное в другой каталог, отправка на e-mail письма о работе скрипта (каждый раз или после аварийного завершения), максимально подробный лог-файл. С обновления от 14.07.2010 поддержка 1С 8.2 !!!

Скачать файлы

Наименование Файл Версия Размер
Archivator1Cv8_v2
.vbs 32,58Kb
4135
.vbs 32,58Kb 4135 Скачать

Ничего сложно нет. Кто работает со скриптами все поймет. Для остальных созданы комметарии к наиболее важным блокам программы.

Основные принципы работы:

    *  каждая база 1С архивируется в отдельную папку;
    *  в этой самой "отдельной папке" накапливаются все архивы баз 1С;
    *  при наступлении окончания срока хранения архива(ов) - автоматически удаляются из  соответствующих папок;
    *  перед выгрузкой баз закрываются все локально запущенные экземпляры 1С версий 7.7, 8.1 и 8.2;
    *  ведётся максимально подробный лог;
    *  в случае АВАРИЙНОГО ЗАВЕРШЕНИЯ работы скрипта от имени заданного пользователя (напр. администратора) отправляется предупреждающее сообщение на указанный адрес. Есть возможность вложить в сообщение файл (напр. подробный лог, записываемый при архивации);
    *  работает с ФАЙЛОВЫМИ базами 1С v8.1, v8.2 и любыми базами 1С v7.7.

Весь процесс архивирования выполняется только средствами самой Windows и 1С (без привлечения дополнительного ПО).

Опубликована ОБНОВЛЕННАЯ ВЕРСИЯ v2 от 06.07.2010!!!

ИЗМЕНЕНИЯ в новой версии:

    *  Теперь все необходимые переменные и константы вынесены в начало скрипта;
    *  Сам код стал более информативным (добавлены новые комментарии);
    *  Лог-файл также стал более информативным, каждая операция подробно отражена;
    *  Добавлена функция дополнительного ежемесячного резервного копирования (дублирования) архивных файлов в отдельный каталог (раз в месяц дублируется последний файл). Если файл уже был ранее скопирован, то повторное копирование не происходит (дабы избежать беcсмысленных операций), о чем выводится сообщение в логе;
    *  После операции ежемесячного дублирования в лог выводится результат операции (напр. имя скопированного файла);
    *  После удаления устаревших файлов в лог записывается информация о кол-ве удаленных объектов;
    *  Появилась возможность управления состояниями процессов удаления файлов, дополнительного резервного копирования и отправки e-mail. Теперь при помощи констант можно ВКЛ. или ВЫКЛ. данные процессы;
    *  Проверяет наличие свободного места на диске для архивных копий и записывает в лог;
    *  Исправлена ошибка при работе с базами 1С v 7.7, при которой не выполнялось удаление устаревших файлов.

С  ОБНОВЛЕНИЯ от 14.07.2010 поддержка 1С 8.2 !!!

С  ОБНОВЛЕНИЯ от 24.07.2010 добавлена возможность отправки сообщений о каждом завершении работы скрипта на e-mail. При помощи константы EmailEndScript: если True - будет отправляться извещение об окончании работы скрипта, если False - не будет!

Еще новая опция. Определить наличие зарегистрированного пользователя в системе 1С. Константа User = True - пользователь есть (логин+пароль), User = False - в системе нет определенных пользователей (при этом имя и пароль запрашивать не будет).

Скрипт редактируем в блокноте, указавая свои данные. Что и где ввести см. на скриншотах!

В последней редакции исправлена некорректная работа с сетевыми путями при создании каталогов на удаленном компьютере.

Скачивайте! Буду рад, если кому-то помог!

P.S.
Планирую продолжить развитие темы.
Что будет в новой версии?
Информирование пользователей домена о начале регламентных работ.
Возможность принудительного завершения процессов 1С на всех компьютерах домена.
Отправки e-mail с компьютера, на котором не установлен локальный SMTP-сервис/сервер.
и конечно работа с SQL-версиями.
Идей много... Дело за малым... Найти ВРЕМЯ!

Автоматическая Архивация БД 1С 8.2 выгрузка БД файловая база данных лог архива e-mail при завершении без дополнительного ПО удаление устаревших архивов открытый код скрипта

См. также

Архивирование базы 7.7

Архивирование (backup) Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Программа, написанная на Delphi7 для автоматизации сохранения БД.

1 стартмани

02.01.2017    15353    12    mt111    21    

0

Автоматическое сохранение базы штатными средствами

Архивирование (backup) Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Всё началось с того, что я лентяй. Когда пришел на работу в первый раз, мне сообщили, что уже лет 10 делают сохранение  базы каждый день в конце рабочего дня. Из этого вытекает, что  если кто-то решит подтянуть свои хвосты, то мне приходится сидеть на работе тоже. Честно, мягко говоря, меня это не особо радовало... Порывшись на просторах инета, было принято решение сделать "автосохранялку". Как уже говорилось, "Я ЛЕНИВЫЙ", поэтому мне было попросту лень ставить всякие утилиты и программки, реализовал все штатными средствами.

1 стартмани

02.12.2016    16312    5    mt111    9    

3

Простые вещи: Делаем архив базы 1С за 30 секунд

Архивирование (backup) Платформа 1С v7.7 Платформа 1С v8.3 Конфигурации 1cv8 Конфигурации 1cv7 Абонемент ($m)

Архив файловой базы 1С можно сделать за 30 секунд. Делаем предварительные настройки.

1 стартмани

09.12.2014    38910    12    denisk37    72    

27

Бэкапер-1С: резервные копии бухгалтерии (1С 7.7 - 8.3)

Архивирование (backup) Платформа 1С v7.7 Платформа 1С v8.3 Конфигурации 1cv8 Конфигурации 1cv7 Абонемент ($m)

Бэкапер-1С: версия 1.5.0. Появилась гибкая система удаления старых копий! А также: автоматический поиск баз, архивация документов, встроенный архиватор 7-Zip, целостность создаваемых копий, шифрование, отправка отчетов на почту и каталогизация. Ещё никогда резервное копирование не делалось так просто.

1 стартмани

16.05.2013    74311    638    alexey.karmanov    181    

84

Архивация баз средствами командной строки Windows и архиватора Izarc, также скрипт для Linux.

Архивирование (backup) Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Абонемент ($m)

Архивация баз данных 1С 7.7 (при небольшом редактировании и версий 1С 8.х) средствами командной строки и архиватора Izarc Архивация каталога базы данных при размещении на Linux (smb-сервере к примеру) средствами linux.

1 стартмани

11.05.2012    13937    16    slava81    5    

3

Архивация 1сv7

Архивирование (backup) OpenConf Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Абонемент ($m)

Обработка при помощи WinRar архивирует каталог с БД.

1 стартмани

06.04.2012    12834    34    l2d808    20    

5

Архивация списка баз 1С:Предприятие 7.7

Архивирование (backup) Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Абонемент ($m)

Быстрая архивация списка баз 1С:Предприятие 7.7 в файл реестра.

1 стартмани

19.02.2012    12603    26    alexkrv    4    

3
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. lumb 21.06.10 14:39 Сейчас в теме
Точно с SQL версиями 8.1 не работает? ;)
2. roskmv 611 21.06.10 14:49 Сейчас в теме
В описании было написано только с файловыми версиями. Сам не проверял!
3. alexk-is 6533 21.06.10 18:59 Сейчас в теме
(2) Что означает "было написано" и "Сам не проверял"?
Чья это разработка?
4. roskmv 611 22.06.10 08:14 Сейчас в теме
Точно уже не помню. Я же писал: "Скрипт найден в Интернете и доработан для себя." У меня файловая версия базы 1С. Поэтому "Сам не проверял" для SQL версий.
5. ValeriTim 20 22.06.10 09:46 Сейчас в теме
(4) т.е. ты не разбирался и не понимаешь принципа ее работы ... ?
6. roskmv 611 22.06.10 11:08 Сейчас в теме
Если бы не понимал принципа работы скрипта, то как бы тогда дорабатывал?
Всего навсего - никогда не работал с SQL, поэтому не знаю ИХ принципа работы... :(
7. migulia 23.06.10 08:30 Сейчас в теме
у меня выдает сообщение об ошибке
Переменная "DeleteTextFile" не определена
что сделать (с криптами не работал)?
заремил но хочется чтобы работало
8. asterlana 219 23.06.10 11:00 Сейчас в теме
Замечательно архивируется! :-)
9. roskmv 611 23.06.10 11:46 Сейчас в теме
Спасибо!
Для migulia отвечаю.
Посмотрел свой скрипт и прошу прощения за неточность. В скрипте в двух позициях "DeleteTextFile" замени на "DeleteFile".
10. alexander_prok 23.06.10 18:40 Сейчас в теме
Замечательная штучка
11. Рамзес 29 24.06.10 07:52 Сейчас в теме
В имя файла дата не пишется?
12. sashocq 193 24.06.10 08:31 Сейчас в теме
Однозначно "+". Только дорабатывать, конечно, надо. Например, хотелось бы, чтобы старые базы не удалял все, а оставлял хотя бы одну на каждый месяц.
Жаль, что на этом кривом vbs, а не на человеческом js :-(
13. roskmv 611 24.06.10 08:44 Сейчас в теме
У меня имя файла с датой, все нормально. Поясни какую версию архивируешь? 8 или 7.7
14. roskmv 611 24.06.10 08:46 Сейчас в теме
На счет дорабатывать, так ты угадал мой следующий шаг. В ближайшее время этим и займусь ;)
15. NoMax 232 25.06.10 11:04 Сейчас в теме
Гм...
А зачем создавать bat файл для запуска vbs?
Все и так прекрасно запускается в планировщике.
16. alexk-is 6533 25.06.10 13:35 Сейчас в теме
Вот здесь есть ссылки на публикации аналогичной направленности http://www.infostart.ru/public/19363/
17. roskmv 611 25.06.10 14:44 Сейчас в теме
На счет bat файла согласен.
Мне же он нужен был только для того, чтобы в процессе архивации отображалось окно с предупреждением!
18. roskmv 611 25.06.10 14:58 Сейчас в теме
Согласен, аналогичных публикаций много.

Всем спасибо за плюсики!!!

В ближайшее время выложу обновленную версию ! :idea:
19. CaSH_2004 372 28.06.10 15:25 Сейчас в теме
Давно работаю в этом направлении, сделал подобное на bat теперь вот тоже написал на vb (насчет js - незнаю какие у него реальные преимущества?)
и сразу думаю нужен список баз организовать хранение в ini файле как для нормальной проги
готов подключится к работе для создания нормального многопрофильного скрипта
у меня даже есть реализация на vb механизма выгрузки через конфигуратор для SQL баз где обычное копирование не пройдет

А ВООБЩЕ ХОРОШИЙ ПРИМЕР КОДА И ВОЗМОЖНОСТЕЙ VB
я все это по крупицам собирал и тестировал

Так что вперед автор, делай новые версии, пиши на zerbo-2001@yandex.ru если что то нужно - реализуем вместе, можно потом и документацию небольшую сваять
20. CaSH_2004 372 28.06.10 15:34 Сейчас в теме
поправка zerno-2001@yandex.ru

по поводу других разработок: все не смотрел, но написанные на 1С категорически отметаю т.к.
1. нужен универсальное средство не зависящее от ключа или платформы
2. нужно удобство и быстрота разработки и доработки для конкретного случая - а 1С предназначена для экономических задач (открыть Syn в Totale гораздо быстрее со всеми подсветками чем конфигуратор)
3. ну и наконец - нужно иметь больший кругозор, ведь vb позволяет работать без 1С и делать тоже удобные вещи, это большой помошник при автоматизации работы с ПК



21. CaSH_2004 372 28.06.10 15:45 Сейчас в теме
посмотрел половину ссылок на аналоги
самая крутая на VB пока http://www.infostart.ru/public/63813/
рассматриваю только VB (как вариант JS, но на нем не видел) т.к. это позволяет добится тех же возможностей только без интерфейса что и другие разработки
но зато наработки на VB легко используемы в других местах и это открытый код, окрытые исходники, по моему мнению это нужно развивать т.к. закрытые решения в корне неинтересны
22. natazo 28.06.10 21:51 Сейчас в теме
Полезная штука!
Отлично архивирует. Как написано. Спасибо! :)
23. migulia 30.06.10 23:17 Сейчас в теме
Все отлично но вот беда у меня почему то не удаляет старые файлы ?
24. roskmv 611 01.07.10 09:02 Сейчас в теме
Какая у тебя версия 7.7 или 8?
Что пишет в логе?
25. wd2000 86 01.07.10 09:29 Сейчас в теме
У меня тоже не удаляет старые файлы, как 7.7 и 8.1.

Подготавливаем строку для запуска 1С v 7.7
Строка для запуска 1С получилась следующая:
"C:\Program Files\1cv77\bin\1cv7.exe" config /d"D:\1cbase\nko\PRBasic" /n"Admin" /p"1" /@"D:\BackUp1C\nko\1CBackUp.prm"
Запускаем 1C в пакетном режиме...
Отчёт самой программы 1С о выгрузке базы следующий:
20100625;22:40:02;Admin;C;UpDown;UpDownDnldToFile;1;D:\BackUp1C\nko\1Cv7 25.06.2010 22.40.00.zip;;
20100625;22:41:12;Admin;C;UpDown;UpDownDnldSuc;1;;;

Удалим файл с отчётом 1С с диска компьютера...
Файл с отчётом 1С успешно удалён!

Удалим файл параметров выгрузки базы 1С с диска компьютера...
Файл параметров выгрузки базы 1С успешно удалён!
Закончили обработку базы № 1
26. roskmv 611 01.07.10 09:41 Сейчас в теме
Да про 7.7 уже знаю. :( Исправляю !
Сегодня или завтра выложу обновленную версию. :)
27. migulia 06.07.10 07:23 Сейчас в теме
:( так как же все ж с удалением старых баз решается :?:
28. roskmv 611 06.07.10 08:04 Сейчас в теме
Прошу прощения за долгое молчание. Уезжал, совсем не было времени. Вчера наводил последние штрихи.
29. roskmv 611 06.07.10 08:12 Сейчас в теме
Вот, выложил ОБНОВЛЕННУЮ версию! :D
Смотрите, качайте, оценивайте... ;)
Есть ряд изменений и дополнений. Об этом напишу в описании.
Жду отзывов...
30. migulia 06.07.10 23:54 Сейчас в теме
:) Стесняюсь спросить а обязательно базы разносить в разные каталоги или можно их хранить в одном :?:
31. roskmv 611 07.07.10 08:24 Сейчас в теме
Можно в одном, но для меня удобнее если в разных ;)
Чтобы все было в одном, в параметрах каждой базы введи одинаковый параметр: MyBase.BaseBackUpFolderName = "твоя папка"
32. Otshelnik 29 07.07.10 15:16 Сейчас в теме
Спасибо, то что надо! Только перед использованием надо сделать так:

"DeleteTextFile" замени на "DeleteFile"
33. roskmv 611 07.07.10 15:30 Сейчас в теме
Рад, что понравилось ! :)
Отдельное спасибо за указанную ошибочку.
Все исправил!!!
34. Kyrales 144 13.07.10 05:59 Сейчас в теме
Добавить возможность сохранения в SQL версии 1С 8 и будет отлично. А лучше еще сделать внешнюю обработку, которая автоматически заполнит все данные и создаст этот файл.
35. roskmv 611 14.07.10 13:18 Сейчас в теме
С обновления от 14.07.2010 добавил поддержку 8.2 !!! :!:
36. Winston Kent 14.07.10 16:06 Сейчас в теме
Дружище! Мегагигантское тебе спасибо!!!! Очень полезный скрипт!!!! И главное работает правильно...
37. roskmv 611 14.07.10 16:12 Сейчас в теме
Да.. не за что :D
Вот бы еще плюсик ;)
38. vvitek 16.07.10 11:25 Сейчас в теме
Классно, и код открыт, можно под себя переделать, хотя и так прекрасно работает!
СПАСИБО ! :)
39. qosmo 16.07.10 17:51 Сейчас в теме
Добавь поддержку SQL и будет просто супер !!! 8-)
40. semkon 16.07.10 17:58 Сейчас в теме
Скачал и ... неожидал ... заработало сразу, правильно и без глюков. :o
Такое редкость.
Автору однозначно преспект !!! :D
Плюсануть не жалко ;)
skutuz; werdikt; +2 Ответить
41. roskmv 611 16.07.10 18:08 Сейчас в теме
Однако...
Всем нравится, качают, все работает, а ... плюсануть забываем!?
Обидно-о-о :(
Азверин; werdikt; +2 Ответить
42. relexx 19.07.10 22:19 Сейчас в теме
Приветствую.
Базы из 8-ки отлично выгружает! Респект!
А вот с семеркой такая ошибка:
Сценарий ...
Строка... (у меня 678) - функция выгрузки баз 1С 77
Символ: 3
Ошибка: Variable undefinite "FullPathBaseBackUpFolder"
Код 800A01F4.

Что я не так заполнил?
43. roskmv 611 19.07.10 23:49 Сейчас в теме
Все правильно заполнил...
Прошу прощения, моя ошибка :o
Уже исправил файл и закачал ;)
11120222; +1 Ответить
44. seermak 665 21.07.10 12:37 Сейчас в теме
Вопрос: а нельзя сделать так, чтобы получать извещение об окончании работы скрипта
46. roskmv 611 21.07.10 18:31 Сейчас в теме
(44) Куда получать извещение об окончании работы скрипта?
На почту?
45. big_nab 21.07.10 13:12 Сейчас в теме
А что писать если логин-пароль на базу не установлены?
А то приходится Ок все время жать.
51. roskmv 611 24.07.10 02:38 Сейчас в теме
(45) Теперь не надо будет жать ОК.
Качай новую версию, установи константу User = False и наслаждайся.
Будут вопросы, пиши... ;)
47. zolotze 22.07.10 08:24 Сейчас в теме
Автору огромное спасибо, давно искала что-то подобное для небольших баз :D !
Все отлично работает, и 8.1, и 7.7!
СПАСИБО!!!
48. seermak 665 22.07.10 13:52 Сейчас в теме
( 46) - у меня база большая - пока скрипт отработает люди успевают состарится :) а постоянно заглядывать в лог завершилось или нет не очень хочется....
49. roskmv 611 22.07.10 22:05 Сейчас в теме
(48) Понял, сделаю, чтобы на почтовый адрес отправлялось извещение об окончании работы скрипта.
Как выложу обновление, так напишу. :)
50. roskmv 611 24.07.10 01:25 Сейчас в теме
(48) Выложил обновление...
Теперь на почтовый адрес отправляется извещение об окончании работы скрипта.
Функцию при желании можно отключить. Выше в описании все сказано об этом. Качай, проверяй. Рад помочь. :D
52. IToxicI 30.07.10 09:03 Сейчас в теме
Доброво времени суток. У меня вот такая проблемка с вашим скриптом. Скрипт работает все нормально (выгрузка данных) но почему-то на проверке свободного места на диске выдает ошибку....
53. roskmv 611 30.07.10 11:22 Сейчас в теме
какая ошибка? можете подробнее описать?
54. IToxicI 30.07.10 13:53 Сейчас в теме
Сценарий: E:\Toxic\Archivator1Cv8_v2.vbs
Строка: 588
Символ: 6
Ошибка: Ну удается найти указанный файл
Код: 80070002
Источник: CDO.Message.1

ВНИМАНИЕ!!! Проверяем наличие свободного места на диске для архивных копий...
Диск E: - / Своббодно: 26 333 Мбайт


Архивация закончена.
Дата: 30.07.2010
Время: 14:05:26
КОНЕЦ


Отправлено предупреждающее сообщение на e-mail.
Дата: 30.07.2010
Время: 14:05:26
КОНЕЦ

А вообще скриптик изумительный!!!
55. roskmv 611 30.07.10 15:34 Сейчас в теме
(54) Теперь все становится ясно.
При проверке свободного места на диске ошибок нет
ВНИМАНИЕ!!! Проверяем наличие свободного места на диске для архивных копий...
Диск E: - / Своббодно: 26 333 Мбайт

А вот тут: Источник: CDO.Message.1 ??? Думаю проблема с отправкой e-mail.
У Вас локальный SMTP сервер установлен?
Если нет? то надо установить такие значения для констант:
Const EmailEndScript = False
Const Email = False
Если таких констант у Вас нет, то качайте последнюю версию отсюда.
56. Dr. Jokker 10.08.10 11:58 Сейчас в теме
было бы хорошо если бы этот скрипт удаленных пользователей обрубал(
57. roskmv 611 10.08.10 16:32 Сейчас в теме
(56) Планировал в новой версии... Думаю скоро ... :)
58. inglsid 11.08.10 09:53 Сейчас в теме
Строка 74, Символ:34, Ошибка: Предполагается наличие окончания инструкции, Код: 800А0401

Из-за чего эт может быть? Программа работает с portable-версиями 1С ?)
59. roskmv 611 11.08.10 14:11 Сейчас в теме
(58) Какая у тебя версия Windows Script Host (в русской версии он называется, по-моему, Сервер Сценариев) ...Набери в командной строке cscript - он выдаст версию ...Или доустановить надо ...Вообще, под ХР можно загрузить его вот отсюда
http://www.microsoft.com/downloads/details.aspx?Fami…mp;displaylang=ru
Что касается портативных версий, то думаю будет работать, главное чтобы все пути были верные, проверь...
60. Ohot-Nik 11.08.10 21:59 Сейчас в теме
Еще не проверил, с временем косяк, но думаю все в порядке будет, если что проинформирую
61. ladoga 12.08.10 05:26 Сейчас в теме
Огромное спасибо! + Работает отлично. Пока проверила на 3 базах. Вопрос - можно ли установить определенное время запуска - конец рабочего дня, например. А то мои бух-ши забывают нажимать кнопочки.
62. roskmv 611 12.08.10 09:48 Сейчас в теме
(61) Очень просто! Создать в планировщике заданий Windows задачу на запуск скрипта в определенное время или при определенном событии... Если не получится, пишите! :)
63. Brom46 27 14.09.10 15:26 Сейчас в теме
Отличный скрипт :D,
в коплекте с бесплатным xStarter работает на 5 с плюсом :)

немного дописал функцию для прямой отправки мыла через SMTP майла-ру (можно и любого другого)...
Set iConf=CreateObject("CDO.Configuration")
        Set Flds=iConf.Fields
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=1
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="sender@mail.ru"       'почтовый ящик отправителя
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="pass"   ' пароль на почтовый ящик
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.mail.ru"
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25
        Flds.Update
        objEmail.Send()
Показать

(может пригодится кому)
zVORTEXz; numerok; +2 Ответить
64. roskmv 611 17.09.10 08:45 Сейчас в теме
Спасибо за комментарий!
Данную функцию планирую ввести в следующей версии, вот только не хватет времени реализовать :(
Буду изыскивать... ;)
65. petrovasya 20.09.10 09:24 Сейчас в теме
Скачал себе. Будем тестить. :)
66. ho0p 21.09.10 18:14 Сейчас в теме
Интересует, каким образом закрываются локально запущенные экземпляры 1С ?
67. masha_bol 26.09.10 10:01 Сейчас в теме
68. dellic 30.09.10 14:50 Сейчас в теме
69. numerok 07.10.10 16:34 Сейчас в теме
Set iConf=CreateObject("CDO.Configuration") 
        Set Flds=iConf.Fields 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=1 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="sender@mail.ru"       'почтовый ящик отправителя 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="pass"   ' пароль на почтовый ящик 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.mail.ru" 
        Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
        Flds.Update 
        objEmail.Send()
Показать


А куда это вставлять??? И какие-нибудь измнения еще в скрипте нужно при этом делать?
А то у меня локального smtp нет, а уведомление на почту ой как надо!!!

Ну или как сделать, чтобы после окончания выскакивало popup окошко с информацией либо о успешной выгрузке либо об провале???
70. roskmv 611 08.10.10 18:15 Сейчас в теме
(69) Завтра выложу обновление в котором данная функция реализована, т.е. отправки e-mail с компьютера, на котором не установлен локальный SMTP-сервис/сервер. ;)
173. fomix 33 02.03.12 15:26 Сейчас в теме
(70) Спасибо за скрипт - все работает, кроме отправки на почту без локального smtp клиента.. пробовал вставить скрипт из 69 поста - ругается.
71. Koroleva1 14.10.10 08:11 Сейчас в теме
СПАСИБО! РАБОТАЕТ НОРМАЛЬНО! :D
72. DobryaginaB 14.10.10 13:38 Сейчас в теме
Спасибо за обработку! Работает отлично. Немного дописала, чтобы по окончании выдавалось окно сообщения. А то не видно было, когда закончилась архивация.

В целом - все очень понравилось и пригодилось.
andreyrosp; +1 Ответить
73. andreyrosp 11 14.10.10 17:46 Сейчас в теме
74. Sergey.G.Ivanov 14.10.10 22:01 Сейчас в теме
Замечательная вещь очень помогла!!!
75. ОлегФ 07.11.10 11:13 Сейчас в теме
Установил програму, настроил по варианту №2, когда перегрузил компютер, то появляєтся собщение Windows Script Host:
Сценарий: D:\1C_Arhiv\AutoBackUp (резервная копия).vbe
Строка: 26
Символ: 3
Ошибка: Недопустимый вызов или аргумент процедуры: 'Chr'
Код: 800А0005
Источник: Ошибка выполнения Microsoft VBScript

Может кто-то подскажет в чем может быть проблема, архивирование по розписанию вариантом №1 тоже не работает.


76. nadi_bar 08.11.10 12:30 Сейчас в теме
Спасибо, очень полезная программка
77. necros 10.11.10 14:52 Сейчас в теме
халь что почту так и не осылает пока еще не обновили
78. kosmos777 15.12.10 23:20 Сейчас в теме
Для выгрузки надо создать нового пользователя? Какие права у пользователя должны быть?
А как же пароль? Он хранится получается в открытом виде.
79. grum01 115 12.01.11 11:03 Сейчас в теме
ho0p пишет:

Интересует, каким образом закрываются локально запущенные экземпляры 1С ?


ага. меня вот тоже смущают строки типа
KillProcess "1cv8%"
:o
так делать нельзя;
автор по-видимому еще не сталкивался с проблемой разрушения баз при таких кренделях.. :?:
80. Sergafan10 06.02.11 22:10 Сейчас в теме
Имею 2 базы 7.7 SQL и dbf, в списке друг за дружкой аналогично. SQL бакапится нормально, а вот следом dbf бакапиться никак не желает. Меняю очередность - курят обе. Оставляю одну dbf - бакапятся нормально. Что такое может быть??
81. vint2008 28.02.11 17:03 Сейчас в теме
Brom46 пишет:

Отличный скрипт ,

в коплекте с бесплатным xStarter работает на 5 с плюсом



немного дописал функцию для прямой отправки мыла через SMTP майла-ру (можно и любого другого)...



А куда это вставлять а то локального SMTP нет....
82. i132 122 14.04.11 16:18 Сейчас в теме
Предложение доработки для файлового варианта базы:
Вначале скопировать базу во временный каталог (причем лучше вначале копировать самые свежие файлы для 7.7) а потом уже выгружать - так не надо выгонять пользователей, но портит достоверность архива
83. boggonzikov 339 20.04.11 00:52 Сейчас в теме
Очень не хватает SQL
Если поможет посмотри здесь реализовано
84. Muay_thai 15.05.11 15:32 Сейчас в теме
люди подскажите что делаю нет так (или как надо делать)
ситуация следующая
1с server + PosGreSQL живут на Ubuntu
клиент 1с живет на Windows
хочу пользовать скрипт

правлю скрипт под себя
------
Set MyBase = New Base1C
ReDim Preserve BasesList(UBound(BasesList)+1)
MyBase.Type1C = "82"
MyBase.Program1CName = "C:\Program Files\1cv82\8.2.12.80\bin\1cv8.exe"
MyBase.BaseLocationPath = "C:\Users\Wolf\AppData\Roaming\1C\1Cv82\tmplts\1c\Accounting\2_­0_17_6"
MyBase.BaseBackUpFolderName = "Бухгалтерия"
MyBase.BaseBackUpFileName = "1Cv8"
MyBase.UserName = "Администратор"
MyBase.UserPassword = ""
Set BasesList(UBound(BasesList)) = MyBase
Set MyBase = Nothing

------
как я понял надо обращяться именно по таким путям
но лог пишет что
"Запускаем 1C в пакетном режиме...
Отчёт самой программы 1С о выгрузке базы следующий:
Информационная база не обнаружена!"

что делать :?:
85. Muay_thai 15.05.11 16:38 Сейчас в теме
люди очень горит подскажите что делаю не так =(
-------------
ругается на то что база не найдена
но я не знаю где она еще можеть лежать ? ссылаюсь на вполне существующий файл (размером в 80 мб и форматом *.dt)
-------------
или изза того что у меня все через PostGreSql я не смогу указать скрипту на Информационную Базу ?
86. apteka84 25.05.11 21:17 Сейчас в теме
а как настроить чтобы она автоматически также делала реиндексацию базы 8.1
87. Amirzhan 29.07.11 09:19 Сейчас в теме
Здравствуйте, проблема такая, например сейчас у меня месяц июль, все ок, наступает месяц август к примеру и все (Тупо Запускается и тупо закрывается) НАЧАЛО
Начинаем процесс автоматической архивации.
Лог пишется в файл E:\BackUp1C\BackUp1CBases.Log
Дата: 8/1/2011
Время: 10:28:11 AM

Ищем все запущенные экземпляры 1С v 8.x ...
Найдено экземпляров 1С v 8.x: 0
Продолжаем работу.

Ищем все запущенные экземпляры 1С v 7.7 ...
Найдено экземпляров 1С v 7.7: 0
Продолжаем работу.

Проверяем существование корневой папки для архивов
E:\BackUp1C - File already exists
Папка нашлась.
Продолжаем работу.

Количество архивируемых баз = 2

Обрабатывается база № 1
Тип базы: 81
Имя исполняющего файла 1С: C:\Program Files\1cv81\bin\1cv8.exe
Исходное расположение базы: E:\Accounting
Папка для архивной копии: Бухгалтерия
Имя файла для архивной копии: 1Cv8Acc 7
Имя пользователя: Админ
Пароль пользователя: admin

Определили, что тип базы 1С v 8.1
Проверяем наличие папки для хранения архивной копии...
E:\BackUp1C - File already exists
E:\BackUp1C\Бухгалтерия - File already exists
Папка нашлась.

Проверяем наличие папки с информационной базой 1С...
Папка с информационной базой нашлась.
Продолжаем работу.

Подготавливаем строку для запуска 1С v 8.1
Строка для запуска 1С получилась следующая:
"C:\Program Files\1cv81\bin\1cv8.exe" CONFIG /DumpIB "E:\BackUp1C\Бухгалтерия\1Cv8Acc 7 8/1/2011 10.28.12 AM.dt" /F"E:\Accounting" /nАдмин /padmin /wa- /Out"E:\BackUp1C\Бухгалтерия\dump.log" -NoTruncate
Запускаем 1C в пакетном режиме...
Отчёт самой программы 1С о выгрузке базы следующий:
Каталог не обнаружен 'E:\BackUp1C\Бухгалтерия\1Cv8Acc 7 8\1\2011 10.28.12 AM.dt'

Удалим файл с отчётом 1С с диска компьютера...
Файл с отчётом 1С успешно удалён!

Переходим к резервному копированию месячных копий баз 1С...
Проверяем наличие папки для хранения ежемесячных копий...
E:\BackUp1C - File already exists
E:\BackUp1C\ReserveMonth - File already exists
Папка для хранения ежемесячных копий баз 1С нашлась.
Резервирование не требуется! Ждем окончания месяца.

Переходим к удалению устаревших копий баз 1С...
Устаревших файлов не обнаружено

Закончили обработку базы № 1

Обрабатывается база № 2
Тип базы: 82
Имя исполняющего файла 1С: C:\Program Files\1cv82\8.2.9.356\bin\1cv8.exe
Исходное расположение базы: E:\1CBases\Small
Папка для архивной копии: Небольшая фирма
Имя файла для архивной копии: 1Cv8Small
Имя пользователя: Админ
Пароль пользователя: admin

Определили, что тип базы 1С v 8.2
Проверяем наличие папки для хранения архивной копии...
E:\BackUp1C - File already exists
E:\BackUp1C\Небольшая фирма - File already exists
Папка нашлась.

Проверяем наличие папки с информационной базой 1С...
Папка с информационной базой не обнаружена, нет объекта для резервирования!!!
АВАРИЙНОЕ ЗАВЕРШЕНИЕ РАБОТЫ ПРОГРАММЫ!!!
88. Amirzhan 29.07.11 09:25 Сейчас в теме
Отчёт самой программы 1С о выгрузке базы следующий:
Каталог не обнаружен 'E:\BackUp1C\Бухгалтерия\1Cv8Acc 7 8\1\2011 10.31.14 AM.dt' Вот Это я не совсем понял..... а именно 8\1\ - это как прописать и где
89. Amirzhan 29.07.11 10:18 Сейчас в теме
Проблема решена ! Спасибо за Скрипт!
90. Dinkin 15.09.11 21:34 Сейчас в теме
Попробовала на 1С 7.7 несколько баз. Все работает.
91. deadmz 17.09.11 21:35 Сейчас в теме
Спасибо! Все работает отлично!
92. FIZIK 11 23.09.11 14:06 Сейчас в теме
Отличная вещь. Спасибо!
93. i_konnov 28.09.11 22:22 Сейчас в теме
Полезная и нужная штука. Спасибо
94. zas2004 29.09.11 14:08 Сейчас в теме
Выдает какую-то ошибку, но работае спасибчки огромнейшее!!!!!!!!!!!!
95. burnoutparad 02.10.11 00:50 Сейчас в теме
попробую на работе поставить, она может работать, когда пользователи а 1с сидят ?
97. zhleonid8 03.10.11 17:27 Сейчас в теме
(95) burnoutparad, на работе ставь любой стандартный бекап в режиме реального времени, без отключения пользователей! этого хватит, сам Нуралиев заверяет:)
96. zhleonid8 03.10.11 17:25 Сейчас в теме
привет
совет бекапиться раром 1сд файл и все сохраниться, а вот обработка это отличная лучше я не нашел, но вот отсылку на емейл пришлось отключить, единственная обработка к которой у меня нет претензий:)
98. wolf2012x 05.10.11 23:02 Сейчас в теме
А на 8.2 нормально работает? Кто уже пользовался?
Оставьте свое сообщение