File tree Expand file tree Collapse file tree 1 file changed +5
-14
lines changed
Expand file tree Collapse file tree 1 file changed +5
-14
lines changed Original file line number Diff line number Diff line change 2020 ВызватьИсключение ТекстИсключения;
2121 КонецЕсли ;
2222
23- HTMLхаба = Ответ.ПолучитьТелоКакСтроку();
24- ВремФайл = ОбъединитьПути(КаталогВременныхФайлов (), "list.txt" );
25- Ответ.ПолучитьТелоКакДвоичныеДанные().Записать(ВремФайл);
23+ ТекстОтвета = Ответ.ПолучитьТелоКакСтроку();
2624 Ответ.Закрыть();
27-
28- ЧтениеТекста = Новый ЧтениеТекста();
29- ЧтениеТекста.Открыть(ВремФайл);
25+
3026 ПакетыХаба = Новый Соответствие;
31-
32- СтрокаТекста = ЧтениеТекста.ПрочитатьСтроку();
33- Пока СтрокаТекста <> Неопределено Цикл
34- ПакетыХаба.Вставить(СтрокаТекста, Истина );
35- СтрокаТекста = ЧтениеТекста.ПрочитатьСтроку();
27+ КоличествоПакетовВХабе = СтрЧислоСтрок (ТекстОтвета);
28+ Для НомерСтроки = 1 По КоличествоПакетовВХабе Цикл
29+ ПакетыХаба.Вставить(СокрЛП (СтрПолучитьСтроку (ТекстОтвета, НомерСтроки)), Истина );
3630 КонецЦикла ;
3731
38- ЧтениеТекста.Закрыть();
39- УдалитьФайлы (ВремФайл);
40-
4132КонецПроцедуры
4233
4334Функция ЭтоПакетХаба (Знач ИмяПакета ) Экспорт
You can’t perform that action at this time.
0 commit comments