скорее всего...
скорее всего...
Спасибо до начало теста сделал
я решил сначало просто тестировать,а потом видно будет
> а потом видно будет<br>а потом поздно будет.
не для меня
предупрежден - вооружен?
"Тут, на днях, у клиента возникла проблемка похожая. Запускает базу, а она висит...<br>исследования показали, ошибочка в глобальном модуле, которая так и висит до сих пор и в Бухгалтерии и в Комплексной конфигурации.<br>Вот этот "больной участок":<br> <br><pre>Функция глКаталогОбработкиИнформационныйБлок() Экспорт <br> Перем Размер,Атр,ВС,ВД,ВЗ,Расш;<br> <br> СписокКаталогов = СоздатьОбъект("СписокЗначений");<br><br> ТекКаталог = ФС.ТекКаталог(); <br> КаталогРегОтчетов = КаталогИБ()+"ExtForms";<br> ФС.УстТекКаталог(КаталогРегОтчетов); <br> // Просмотр внешних обработок<br> Файл = ФС.НайтиПервыйФайл("Rp????.grp");<br> Пока ПустаяСтрока(Файл) = 0 Цикл <br> Если (Файл <> "..") И (Файл <> ".") Тогда <br> ФГ=СоздатьОбъект("ФС");<br> ФГ.АтрибутыФайла(Файл, Размер, Атр, ВС, ВД, ВЗ, Расш);<br> Если Сред(Атр,4,1)<>"1" Тогда<br> // ищем только каталоги<br> Продолжить;<br> КонецЕсли;<br> СписокКаталогов.ДобавитьЗначение(КаталогРегОтчетов+"\"+Файл,);<br> КонецЕсли;<br> Файл = ФС.НайтиСледующийФайл();<br> КонецЦикла;<br> <br> ФС.УстТекКаталог(ТекКаталог);<br> <br> Если СписокКаталогов.РазмерСписка()>0 Тогда<br> СписокКаталогов.Сортировать(1);<br> Возврат СписокКаталогов.ПолучитьЗначение(1);<br> Иначе<br> Возврат """";<br> КонецЕсли;<br><br>КонецФункции // глКаталогОбработкиИнформационныйБлок()<br> </pre><br><br> <br>Если в папке ExtForms есть файл (а не папка) с именем вида Rp????.gr тогда эта фунция в выделенном участке зацикливается, поскольку надо-бы его оформить так:<br><b></b><br><pre> Если Сред(Атр,4,1)<>"1" Тогда // ищем только каталоги Файл = ФС.НайтиСледующийФайл(); Продолжить; КонецЕсли; </pre><br><br>посмотрите, нет ли у вас там в папочке ExtForms какого-нибудь "подленького" файлика <br>Самое неприятное, что это срабатывает только при выводе информационного блока, а его обычно отключают. А вот после обновления он опять включается..."