gifts2017

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

Опубликовал Роман (roskmv) в раздел Администрирование - Архивирование (backup)

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

С обновления от 14.07.2010 поддержка 1С 8.2 !!!

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

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


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

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

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


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

    *  Теперь все необходимые переменные и константы вынесены в начало скрипта;
    *  Сам код стал более информативным (добавлены новые комментарии);
    *  Лог-файл также стал более информативным, каждая операция подробно отражена;
    *  Добавлена функция дополнительного ежемесячного резервного копирования (дублирования) архивных файлов в отдельный каталог (раз в месяц дублируется последний файл). Если файл уже был ранее скопирован, то повторное копирование не происходит (дабы избежать безсмысленных операций), о чем выводится сообщение в логе;
    *  После операции ежемесячного дублирования в лог выводится результат операции (напр. имя скопированного файла);
    *  После удаления устаревших файлов в лог записывается информация о кол-ве удаленных объектов;
    *  Появилась возможность управления состояниями процессов удаления файлов, дополнительного резервного копирования и отправки 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-версиями.
Идей много... Дело за малым... Найти ВРЕМЯ!

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

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

См. также

Подписаться Добавить вознаграждение

Комментарии

. Fomix (fomix) 02.03.12 15:26
(70) roskmv, Спасибо за скрипт - все работает, кроме отправки на почту без локального smtp клиента.. пробовал вставить скрипт из 69 поста - ругается.
0. Роман (roskmv) 21.06.10 14:39
Автоматическая архивация баз данных 1С 8.2, 8.1 и 7.7 без установки дополнительного ПО. Удаление устаревших архивов, дублирование ежемесячное в другой каталог, отправка на e-mail письма о работе скрипта (каждый раз или после аварийного завершения), максимально подробный лог-файл.

С обновления от 14.07.2010 поддержка 1С 8.2 !!!

Перейти к публикации

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

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

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

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

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

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



21. Олег Шалимов (CaSH_2004) 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) 01.07.10 09:02
Какая у тебя версия 7.7 или 8?
Что пишет в логе?
25. Денис Викманов (wd2000) 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) 01.07.10 09:41
Да про 7.7 уже знаю. :( Исправляю !
Сегодня или завтра выложу обновленную версию. :)
27. Александр Мигунов (migulia) 06.07.10 07:23
:( так как же все ж с удалением старых баз решается :?:
28. Роман (roskmv) 06.07.10 08:04
Прошу прощения за долгое молчание. Уезжал, совсем не было времени. Вчера наводил последние штрихи.
29. Роман (roskmv) 06.07.10 08:12
Вот, выложил ОБНОВЛЕННУЮ версию! :D
Смотрите, качайте, оценивайте... ;)
Есть ряд изменений и дополнений. Об этом напишу в описании.
Жду отзывов...
30. Александр Мигунов (migulia) 06.07.10 23:54
:) Стесняюсь спросить а обязательно базы разносить в разные каталоги или можно их хранить в одном :?:
31. Роман (roskmv) 07.07.10 08:24
Можно в одном, но для меня удобнее если в разных ;)
Чтобы все было в одном, в параметрах каждой базы введи одинаковый параметр: MyBase.BaseBackUpFolderName = "твоя папка"
32. Otshelnik (Otshelnik) 07.07.10 15:16
Спасибо, то что надо! Только перед использованием надо сделать так:

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

Что я не так заполнил?
43. Роман (roskmv) 19.07.10 23:49
Все правильно заполнил...
Прошу прощения, моя ошибка :o
Уже исправил файл и закачал ;)
11120222; +1 Ответить
44. Сергей (seermak) 21.07.10 12:37
Вопрос: а нельзя сделать так, чтобы получать извещение об окончании работы скрипта
45. Илья (big_nab) 21.07.10 13:12
А что писать если логин-пароль на базу не установлены?
А то приходится Ок все время жать.
46. Роман (roskmv) 21.07.10 18:31
(44) Куда получать извещение об окончании работы скрипта?
На почту?
47. Лидия Малыгина (zolotze) 22.07.10 08:24
Автору огромное спасибо, давно искала что-то подобное для небольших баз :D !
Все отлично работает, и 8.1, и 7.7!
СПАСИБО!!!
48. Сергей (seermak) 22.07.10 13:52
( 46) - у меня база большая - пока скрипт отработает люди успевают состарится :) а постоянно заглядывать в лог завершилось или нет не очень хочется....
49. Роман (roskmv) 22.07.10 22:05
(48) Понял, сделаю, чтобы на почтовый адрес отправлялось извещение об окончании работы скрипта.
Как выложу обновление, так напишу. :)
50. Роман (roskmv) 24.07.10 01:25
(48) Выложил обновление...
Теперь на почтовый адрес отправляется извещение об окончании работы скрипта.
Функцию при желании можно отключить. Выше в описании все сказано об этом. Качай, проверяй. Рад помочь. :D
51. Роман (roskmv) 24.07.10 02:38
(45) Теперь не надо будет жать ОК.
Качай новую версию, установи константу User = False и наслаждайся.
Будут вопросы, пиши... ;)
52. IToxicI 30.07.10 09:03
Доброво времени суток. У меня вот такая проблемка с вашим скриптом. Скрипт работает все нормально (выгрузка данных) но почему-то на проверке свободного места на диске выдает ошибку....
53. Роман (roskmv) 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) 30.07.10 15:34
(54) Теперь все становится ясно.
При проверке свободного места на диске ошибок нет
ВНИМАНИЕ!!! Проверяем наличие свободного места на диске для архивных копий...
Диск E: - / Своббодно: 26 333 Мбайт

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

Из-за чего эт может быть? Программа работает с portable-версиями 1С ?)
59. Роман (roskmv) 11.08.10 14:11
(58) Какая у тебя версия Windows Script Host (в русской версии он называется, по-моему, Сервер Сценариев) ...Набери в командной строке cscript - он выдаст версию ...Или доустановить надо ...Вообще, под ХР можно загрузить его вот отсюда
http://www.microsoft.com/downloads/details.aspx?Fami…mp;displaylang=ru
Что касается портативных версий, то думаю будет работать, главное чтобы все пути были верные, проверь...
60. OhotNik Angel (Ohot-Nik) 11.08.10 21:59
Еще не проверил, с временем косяк, но думаю все в порядке будет, если что проинформирую
61. Виктория Исаева (ladoga) 12.08.10 05:26
Огромное спасибо! + Работает отлично. Пока проверила на 3 базах. Вопрос - можно ли установить определенное время запуска - конец рабочего дня, например. А то мои бух-ши забывают нажимать кнопочки.
62. Роман (roskmv) 12.08.10 09:48
(61) Очень просто! Создать в планировщике заданий Windows задачу на запуск скрипта в определенное время или при определенном событии... Если не получится, пишите! :)
63. Андрей Портнов (Brom46) 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 Ответить 1
64. Роман (roskmv) 17.09.10 08:45
Спасибо за комментарий!
Данную функцию планирую ввести в следующей версии, вот только не хватет времени реализовать :(
Буду изыскивать... ;)
65. Vasya Petrov (petrovasya) 20.09.10 09:24
Скачал себе. Будем тестить. :)
66. ho0p (ho0p) 21.09.10 18:14
Интересует, каким образом закрываются локально запущенные экземпляры 1С ?
67. masha_bol 26.09.10 10:01
68. Андрей К (dellic) 30.09.10 14:50
69. numerok numerok (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) 08.10.10 18:15
(69) Завтра выложу обновление в котором данная функция реализована, т.е. отправки e-mail с компьютера, на котором не установлен локальный SMTP-сервис/сервер. ;)
71. Тамара (Koroleva1) 14.10.10 08:11
СПАСИБО! РАБОТАЕТ НОРМАЛЬНО! :D
72. Bella Dobryagina (DobryaginaB) 14.10.10 13:38
Спасибо за обработку! Работает отлично. Немного дописала, чтобы по окончании выдавалось окно сообщения. А то не видно было, когда закончилась архивация.

В целом - все очень понравилось и пригодилось.
andreyrosp; +1 Ответить
73. AndreyRosp Маханько (andreyrosp) 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 (nadi_bar) 08.11.10 12:30
Спасибо, очень полезная программка
77. Андрей Тутов (necros) 10.11.10 14:52
халь что почту так и не осылает пока еще не обновили
78. Ivan Pleshkov (kosmos777) 15.12.10 23:20
Для выгрузки надо создать нового пользователя? Какие права у пользователя должны быть?
А как же пароль? Он хранится получается в открытом виде.
79. Вадим Иванцов (grum01) 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) 14.04.11 16:18
Предложение доработки для файлового варианта базы:
Вначале скопировать базу во временный каталог (причем лучше вначале копировать самые свежие файлы для 7.7) а потом уже выгружать - так не надо выгонять пользователей, но портит достоверность архива
83. Андрей Куришко (boggonzikov) 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. anna belyaeva (apteka84) 25.05.11 21:17
а как настроить чтобы она автоматически также делала реиндексацию базы 8.1
87. Arshat Amirzhan (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. Arshat Amirzhan (Amirzhan) 29.07.11 09:25
Отчёт самой программы 1С о выгрузке базы следующий:
Каталог не обнаружен 'E:\BackUp1C\Бухгалтерия\1Cv8Acc 7 8\1\2011 10.31.14 AM.dt' Вот Это я не совсем понял..... а именно 8\1\ - это как прописать и где
89. Arshat Amirzhan (Amirzhan) 29.07.11 10:18
Проблема решена ! Спасибо за Скрипт!
90. Dina Rakhimova (Dinkin) 15.09.11 21:34
Попробовала на 1С 7.7 несколько баз. Все работает.
91. Fktrcfylh Vepfktd (deadmz) 17.09.11 21:35
Спасибо! Все работает отлично!
92. FIZIK FIZIK (FIZIK) 23.09.11 14:06
93. Игорь (i_konnov) 28.09.11 22:22
Полезная и нужная штука. Спасибо
94. Александр (zas2004) 29.09.11 14:08
Выдает какую-то ошибку, но работае спасибчки огромнейшее!!!!!!!!!!!!
95. burnoutparad burnou (burnoutparad) 02.10.11 00:50
попробую на работе поставить, она может работать, когда пользователи а 1с сидят ?
96. Брест Беларусь (zhleonid8) 03.10.11 17:25
привет
совет бекапиться раром 1сд файл и все сохраниться, а вот обработка это отличная лучше я не нашел, но вот отсылку на емейл пришлось отключить, единственная обработка к которой у меня нет претензий:)
97. Брест Беларусь (zhleonid8) 03.10.11 17:27
(95) burnoutparad, на работе ставь любой стандартный бекап в режиме реального времени, без отключения пользователей! этого хватит, сам Нуралиев заверяет:)
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа