Имя: Пароль:
1C
1C 7.7
v7: Как проверить, есть функция или нет или как безопасно вызвать функцию
,
0 DJ Anthon
 
31.10.11
15:35
1. Забаньте этого идиота 43% (3)
2. Не интересно 29% (2)
3. Говори уже, давай! 29% (2)
4. Интересно 0% (0)
Всего мнений: 7

Была такая древняя тема...
Как проверить, есть функция или нет или как безопасно вызвать функцию.
так, чтобы обмануть синтаксический контроль.

Ответа не нашли. А я нашел. Прежде чем скажу, у кого какие будут идеи?
48 DJ Anthon
 
31.10.11
17:16
ладно, можете смеяться надо мной. решение получилось непрактичное, поэтому я не стал его использовать. по ОЛЕ подключаюсь к этой же базе, предварительно переименовав юзердеф, чтобы пароль не вводить, затем открываю обработку фунцкцией

Рез = База.ExecuteBatch("ОткрытьФорму(""Отчет"", , """ + ПутьКОбработке + "Проверка.ert"")");

с таким текстом (кидаю приблизительно, потому что уже затер):

Процедура ПриОткрытии()
   Если 1 = 0 Тогда
       МояФункция(1);
       СтатусВозврата(0);
       Возврат;
   КонецЕсли;
   СохранитьЗначение("УдалосьОткрыть", 1);
   СтатусВозврата(0);
КонецЕсли;    


текст можно загружать из файла.
затем читаем по оле это значение, закрываем соединение и возвращаем на место юзердеф.
не проканывает с монопольным режимом, отсутствием доступа к юзердеф и требует пары секунд...

от сообщений не избавиться, но они при этом улетают в окно ОЛЕ, а оно невидимое ;)

дело в том, что другой способ который у меня почти получился, не проканал, я там вообще перемудрил.
проще окно сообщений очищать.

так что уже

Не интересно
53 Читатель
 
31.10.11
19:47
!

Не интересно
AdBlock убивает бесплатный контент. 1Сергей