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

18.07.09

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

–

> >

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

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

	Наименование	Файл	Версия	Размер
	- .1247897152 167,00Kb 77	.1247897152		167,00Kb	77	Скачать

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

–

См. также

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

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

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

10 стартмани

29.04.2015 21069 48 Gvozdod 8

Openconf upd. 2014

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

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

27.04.2014 58257 401 unichkin 50

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

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

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

1 стартмани

23.04.2014 162841 1843 Alexoniq 1588

493

Tray Informer

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

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

1 стартмани

04.09.2013 32418 60 O-Planet 78

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

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

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

1 стартмани

13.08.2013 20377 Reptile 5

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

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

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

1 стартмани

21.02.2013 17790 35 MarSeN 14

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

Инструментарий разработчика Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($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 35894 51 venger 7

Библиотека кода 1С 7.7 (накопленная за 8 лет)

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

Весь код на 1С 7.7, собранный для повторного использования за 8 лет работы.

10 стартмани

25.11.2012 34492 248 adhocprog 51

Комментарии

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

Свернуть все

1. Tatitutu 3847 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 3847 18.07.09 13:06 Сейчас в теме

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

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

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

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

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

КонецЕсли;

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

(6) Принято

5. Tatitutu 3847 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 3115 12.08.09 02:08 Сейчас в теме

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

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

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

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

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