diff --git "a/src/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\321\213/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\320\242\320\265\320\273\320\265\320\263\321\200\320\260\320\274.os" "b/src/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\321\213/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\320\242\320\265\320\273\320\265\320\263\321\200\320\260\320\274.os" index aac0980..0961301 100644 --- "a/src/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\321\213/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\320\242\320\265\320\273\320\265\320\263\321\200\320\260\320\274.os" +++ "b/src/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\321\213/\320\242\321\200\320\260\320\275\321\201\320\277\320\276\321\200\321\202\320\242\320\265\320\273\320\265\320\263\321\200\320\260\320\274.os" @@ -108,24 +108,26 @@ Попытка HTTPЗапрос = Новый HTTPЗапрос(URL); - HTTP = Новый HTTPСоединение(ИмяСервера,Число(443),,,,5); + HTTP = Новый HTTPСоединение(ИмяСервера,443,,,,5); ОтветHTTP = HTTP.ОтправитьДляОбработки(HTTPЗапрос); Исключение КодСостоянияСоединения = 201; - - Пока КодСостоянияСоединения > 200 Цикл + КоличествоПопытокПодключения = 0; + + Пока (КодСостоянияСоединения > 200) И (КоличествоПопытокПодключения < 20) Цикл Прокси = СоздатьДинамическийПрокси(); HTTPЗапрос = Новый HTTPЗапрос(URL); - HTTP = Новый HTTPСоединение(ИмяСервера,Число(443),,,Прокси,3); + HTTP = Новый HTTPСоединение(ИмяСервера,443,,,Прокси,3); Попытка ОтветHTTP = HTTP.ОтправитьДляОбработки(HTTPЗапрос); КодСостоянияСоединения = ОтветHTTP.КодСостояния; Исключение - Пауза(1); + Приостановить(2); + КоличествоПопытокПодключения = КоличествоПопытокПодключения + 1; КонецПопытки; КонецЦикла; @@ -157,14 +159,6 @@ КонецФункции -Процедура Пауза(Секунд) - - ДатаВыхода = ТекущаяДата() + Секунд; - Пока ТекущаяДата() < ДатаВыхода Цикл - //Простите за костыль, но API требует не посылать запросы чаще чем раз в 1 секунду - КонецЦикла; - -КонецПроцедуры Процедура ОпределитьТипСообщения(ДополнительныеПараметры, ПараметрыСообщения) Если ДополнительныеПараметры <> Неопределено