Копирование папок и их содержимого

18.07.09

Разработка - Инструментарий разработчика

Администраторам с десятками баз на поддержке посвящается... (Прошу прощения у SiNа за плагиат). 1С 7.7

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		По подписке [?]	Купить один файл
- .1247897152 167,00Kb 77	77	Скачать (1 SM)	Купить за 1 850 руб.

Если на поддержке у программиста находится большое количество баз данных , то данная обработка поможет автоматически и быстро скопировать нужную папку (например, ExtForms, ExtDb, Usrdef и т.д.) и ее содержимое (кроме вложенных папок) во все помеченные каталоги информационных баз. Обработка проверена только на базах с DBF организацией данных. Для подкраски строк ТЗ используется FormEx, но можно и без него. Огромная благодарность АльФу и Маляеву.

+19 –

См. также

Консоль запросов

Инструментарий разработчика Системный администратор Программист Платформа 1С v7.7 1C77 Абонемент ($m)

Консоль запросов к базе SQL, не требующая внешних компонент

10 стартмани

29.04.2015 22472 57 Gvozdod 8

Openconf upd. 2014

Инструментарий разработчика Системный администратор Программист Платформа 1С v7.7 OpenConf Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 1C77 Россия Бесплатно (free)

Обновленная сборка OpenConf Light Pack.

27.04.2014 59904 447 unichkin 50

StartManager 1.4 - Развитие альтернативного стартера

Инструментарий разработчика Системный администратор Программист Платформа 1С v7.7 Платформа 1С v8.3 Абонемент ($m)

Очередная редакция альтернативного стартера, являющегося продолжением StartManager 1.3. Спасибо всем, кто присылал свои замечания и пожелания, и тем, кто перечислял финансы на поддержку проекта. С учетом накопленного опыта, стартер был достаточно сильно переработан в плане архитектуры. В основном сделан упор на масштабируемость, для способности программы быстро адаптироваться к расширению предъявляемых требований (т.к. довольно часто просят добавить ту или иную хотелку). Было пересмотрено внешнее оформление, переработан существующий и добавлен новый функционал. В общем можно сказать, что стартер эволюционировал, по сравнению с предыдущей редакцией. Однако пока не всё реализовано, что планировалось, поэтому еще есть куда развиваться в плане функциональности.

1 стартмани

23.04.2014 169062 1889 Alexoniq 1603

499

Tray Informer

Инструментарий разработчика Программист Платформа 1С v7.7 Платформа 1С v8.3 Россия Абонемент ($m)

Согласитесь, что окно стандартное сообщений в 1С иногда приносит больше неудобств, чем пользы. И тем более разные "Предупредить"... Что с этим окном только не делают! Его отцепают от формы, делают маленьким, умудряются спрятать за границы экрана. А потом звонят программистам с претензией, что документ почему-то не проводится, отя ничего и не пишет. У вас такого не было? А вот у нас было и не раз )))

1 стартмани

04.09.2013 33523 61 O-Planet 78

Изменение структуры баз 1С 7.7 без долгой реструктуризации. Часть 1. Справочники

Инструментарий разработчика Программист Платформа 1С v7.7 1C77 Абонемент ($m)

На днях встретил вопрос на форуме про возможность внесения изменений в конфигурацию без долгого сохранения в рабочей базе большого объема. Вот решил поделиться опытом, как это делал я. База у нас была объемом порядка 120 Гб. К базе обращался сайт в режиме 24/7, поэтому важно было быстро сохранять изменения и желательно без последующего монопольного запуска для восстановления индексов и процедур и без отключения пользователей от базы. Это первая часть статьи и посвящена она справочникам. С одной стороны - это самый простой объект, с другой стороны, именно про справочник спрашивалось на форуме. Если статья будет востребована, то я напишу аналогичные про документы, регистры и может еще что.

1 стартмани

13.08.2013 22001 Reptile 5

Работа с файлами MS WORD из 1C

Инструментарий разработчика Программист Платформа 1С v7.7 1C77 Абонемент ($m)

Встала недавно задача для одной организации, которая все еще на 1С 7.7 немного автоматизировать работу отдела продаж. А именно уйти от ручного заполнения договоров, сделанных юристами в MS Word. Договора от разных фирм и разного назначения отличались. Переводить их в таблицы 1С очень не хотелось и нашел способ прямо в файлах Word сделать небольшие дополнения, чтобы можно было печатать, используя именно эти заготовки юристов.

1 стартмани

14.07.2013 27800 56 adamx 11

v7.7 1CDialogControls: Инструмент в помощь разработчику на 7.7.

Инструментарий разработчика Программист Платформа 1С v7.7 1C77 Абонемент ($m)

Давным давно, когда я еще плотно писал на 7.7 работа с формами была мучительной и неудобной. Приходилось каждый элемент выкладывать, выравнивать на форме ручками, прописывать код в модуле. Иногда при разработке очередной формы приходила в голову мысль: "а где-то я уже похожее делал..." и начинался мучительный поиск подходящего кода в своих запасах........

1 стартмани

21.02.2013 18433 36 MarSeN 14

[Разработчику] Любая таблица значений в OLAP

Инструментарий разработчика Программист Платформа 1С v7.7 1C77 Абонемент ($m)

Анализируем различные данные в 1С, используя OLAP-технологии со всеми прелестями. Т.е. наглядное отображение данных, быстрые расчеты, горизонтальные и вертикальные группировки любой вложенности, удобная фильтрация, Drag'n'Drop и ещё много приятных вещей от MS. Обработка на входе принимает практически любую таблицу значений (ТЗ в которой колонкам указаны типы значений, строка, число и т.п.), на выходе имеем на форме 1С сводную таблицу и график по этой ТЗ, с которой работаем, как и в Excel со сводной таблицей и диаграммой. Взял за основу разработку «OLAP Анализ счёта» ( http://infostart.ru/public/14964/ ) от JohnyDeath и переделал под любую ТЗ. Опционально используется «Прогресс бар для 1С 77» (http://infostart.ru/public/14061/ ) от Gmix.

1 стартмани

21.12.2012 36469 51 venger 7

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. Tatitutu 3849 18.07.09 08:29 Сейчас в теме

Скачал,Посмотрел ...замечания:
понимаешь, ты сам знаешь что ДОЛЖНА делать и ДЕЛАЕТ твоя обработка...
а вот теперь забудь на минуту и посмотри сам на нее глазами пользователя....

Почему бы не сделать , чтобы при открытии заполнялись все каталоги
кнопку сформировать - переименуй в " Обновить или Загрузить путь баз данных"

Кнопка с Глобусом - вызывает раздражение и она там совершенно не нужно,так красоту не наводят. Если есть кнопка на форме, она должна нажиматься и выполнять какоето действие.
В описании благодарность Альфу ты выразил, а пользователям в описании написать, что обработка может использовать функции ВК Formex не указал.

И как то ооооооооооочень странно ты ее используешь.
По твоей идее с раскроской строк (ты ее -ВК должен попытаться загрузить при открытии обработки но уж ни как при

Процедура ПриДвойномНажатииПравойКнопки(сост, х, у)
Если ЗагрузитьВнешнююКомпоненту("FormEx.dll") = 1 Тогда
Если ТЗ.КоличествоСтрок() <> 0 Тогда
Если Вопрос("Вы действительно хотите удалить строку ТЗ?","Да+Нет") = "Да" Тогда
ТекСтр = ТЗ.ТекущаяСтрока();
ТЗ.УдалитьСтроку(ТЗ.ТекущаяСтрока());
ТЗ.ТекущаяСтрока(ТекСтр);
Иначе
СтатусВозврата(0);
Возврат;
КонецЕсли;
КонецЕсли;
Если ТЗ.КоличествоСтрок() <> 0 Тогда
ТЗ.ВыбратьСтроки();
Пока ТЗ.ПолучитьСтроку() = 1 Цикл
ТЗ.НомПП = ТЗ.НомерСтроки;
КонецЦикла;
КонецЕсли;
ТЗ.ТекущаяСтрока(1);
КонецЕсли;
КонецПроцедуры // ПриДвойномНажатииПравойКнопки()

а у если у пользователя нет этой ВК (и он не подозревает что она должа быть)
как удалить строку из таблицы ?

Сделай рядом или список или ТЗ с "копируемыми файлами - ведь бывает нужно не все скопировать а только 8 из 10 . Дай пользователю выбор.

2. samadurov 108 18.07.09 09:43 Сейчас в теме

(2) Спасибо за замечания. Исправлю

3. samadurov 108 18.07.09 10:06 Сейчас в теме

(2) А глобус не трогай - это святое )))

4. samadurov 108 18.07.09 10:17 Сейчас в теме

(2) Откорректировано

6. Tatitutu 3849 18.07.09 13:06 Сейчас в теме

(4) не все и не польностью еще работы непочатый край.
Совет: поле Источник запрети редактировать...или проверку от дурака сделай

Файл = СоздатьОбъект("ФС"); || это что такое и для чего ????

Если Элемент="Источник" Тогда
Если ФС.ВыбратьКаталог(Источник,"Выберите каталог") = 1 Тогда
КонецЕсли;
ОпределениеПапки();
КонецЕсли;

наверное правильнее будет так

Если Элемент="Источник" Тогда
Если ФС.ВыбратьКаталог(Источник,"Выберите каталог") = 1 Тогда
ОпределениеПапки();
КонецЕсли;

КонецЕсли;

7. samadurov 108 18.07.09 14:23 Сейчас в теме

(6) Принято

5. Tatitutu 3849 18.07.09 12:47 Сейчас в теме

Посмотрю - ну нравится тебе шар голубой...ну повесь его в уголок, а не на кнопку ))))

8. kompas-dm 781 08.08.09 10:43 Сейчас в теме

От администратора с десятками баз на поддержке ...
Примерно такое ваял.
Удовольствия не получил. Причина ведь осталась.
Попробовал иначе.
Сделал 2 папочки уже не базе
1. REG_REPORT (для регламентированных) http://infostart.ru/blogs/1245/
2. REPORT ( для внешних отчетов ) http://infostart.ru/projects/4714/
----------------------------------------------
Редактирую RPLIST.TXT, забрасываю новый отчет и пишу следующий ...
Проблема ушла.
Особенно удобно при удаленке

Да, программный код ну очень простой и до боли тебе знакомый
+, - не выпрашиваю,не парься

9. nickVZ 10 12.08.09 01:57 Сейчас в теме

Я, извините, про обработку ничего не скажу. Не скачивал. Но одно замечание себе позволю:
Методы ФС ГАРАНТИРОВАНО (прошу прощения за каплок, но иного способа выделения здесь не знаю) работают только внутри каталога рабочей базы. Потомушто каталог базы в полном доступе. Так надо :)) А вот вне БД встречаются места, не обремененные полным доступом для вас, как юзера...
Вы, конечно, можете написать ФС.КопироватьФайл(бла-бла-бла), только вот этот метод ничегошеньки не сообщит, если копирование не произойдет. И причину не сообщит. И даже не смотрите в сторону Попытка...Исключение: прерывания оси 1С не видит...
Потому рекомендую пользовать FileSystemObject из Windows Script Host... Это все-таки компонента, "встроенная" в ось, потому работать будет с бОльшей гарантией, чем любая ВК и даже 1С ;)
И побогаче будет. И отрабатывает прерывания исполнения...
Маленький примерчик на копирование файла в каталог BIN (не структуризировано по функциям, склеенная нарезка текстов):
ScriptControl = createobject("MSScriptControl.ScriptControl");
ScriptControl.language="vbscript";
стр="function CopyVK()
|On Error Resume Next
|Set FSO = CreateObject(""Scripting.FileSystemObject"")
|FSO.CopyFile """+ПолноеИмя+""","""+КаталогПрограммы()+ИмяФайла+""", 1
|if Err.Number = 0 then
| CopyVK = """"
|Else
| CopyVK = err.Description
|end if
|end function"; // err.Description возвращает наименование ошибки
ScriptControl.AddCode(стр);

рез=ScriptControl.run("CopyVK");
Если ПустаяСтрока(рез)=0 Тогда
сообщить("Не удалось обновить ВК "+ИмяФайла+". Ошибка "+рез);
.............. и т.д. ;)

Полагаю, WSH АДМИНАМ (опять каплок...) ближе ;)

10. CheBurator 2695 12.08.09 02:08 Сейчас в теме

(9) все так.. все правильно.. помню сам был несказанно удивлен когда обнаружил, что ФС тупро промолчало про невозможность скопировать файл в папку с атрибутом "для чтения"...

13. samadurov 108 12.08.09 11:34 Сейчас в теме

(9), (10)-(12) - Спасибо

11. CheBurator 2695 12.08.09 02:10 Сейчас в теме

автору: все можно сделать совершенно аналогично тому как устанавливаются отчеты с диска ИТС... у меня даже статейка была про "инсталлятор своими руками" - но померла при переезде Иса на новый движок...