• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

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

    Запись на курс до 25 апреля. Получить промодоступ ...

ОбработкаОжидания

  • Автор темы Helena
  • Дата начала
H

Helena

Подскажите, пжл, почему не срабатывает ОбработкаОжидания() с указанным интервалом? Отрабатывается только в первый раз, потом нет.

Функция глЗавершитьРаботу()
КатИБ = КаталогИБ() + "\";

Если ФС.СуществуетФайл(КатИБ + "ExitAll.txt") = 1 Тогда
Текст = СоздатьОбъект("Текст");
Текст.Открыть(КатИБ + "ExitAll.txt");

Стр = "";
Разделитель = "";

Для Сч = 1 по Текст.КоличествоСтрок() Цикл
Стр = Стр + Разделитель + СокрЛП(Текст.ПолучитьСтроку(Сч));
Разделитель = РазделительСтрок;
КонецЦикла;

Сообщить(Стр, "i");

ОбработкаОжидания("глОжидание",20);

Иначе
ОбработкаОжидания("глОжидание",60);
КонецЕсли;

Если ФС.СуществуетФайл(КатИБ + "ExitAll.dbf") = 1 Тогда
Возврат 1;
КонецЕсли;

Возврат 0;
КонецФункции // глЗавершитьРаботу

//*************************************************************************
//
Процедура глОжидание()

Если глЗавершитьРаботу() = 1 Тогда
СохранитьЗначение("НеЗапрашиватьПодтверждениеПриВыходе", 1);
ЗавершитьРаботуСистемы(0);
Возврат;
КонецЕсли;

КонецПроцедуры //глОжидание

Тема закрыта. Нашла ошибку :)
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!