logist @ Сегодня, 21:33
,
Сервер = "bestchange.ru";
КаталогЗагрузки = "D:/Bestchange_parser";
Соединение = Новый HTTPСоединение(Сервер,,,,,,Новый ЗащищенноеСоединениеOpenSSL);
ЧтениеХТМЛ = Новый ЧтениеHTML;
ПостроительДОМ = Новый ПостроительDOM;
//Генерируем имя файла на диске, в который запишется страница сайта
ИмяФайла = КаталогЗагрузки + "/Give/" + "give.html";
//Загружаем нужную нам страницу в каталог
Ресурс = "www.bestchange.ru";
Заголовки = Новый Соответствие;
Запрос = Новый HTTPЗапрос(Ресурс,Заголовки);
Ответ = Соединение.Получить(Запрос, ИмяФайла);
Если Ответ.КодСостояния = 301 Тогда
Ответ = Соединение.Получить(Ответ.Заголовки.Получить("Location"),ИмяФайла);
КонецЕсли;
//Начинаем чтение нашего файла
ЧтениеХТМЛ.ОткрытьФайл(ИмяФайла, "UTF-8");
//Загружаем всю структуру документа в DOM
ДокументХТМЛ = ПостроительДОМ.Прочитать(ЧтениеХТМЛ);
//Получаем все элементы TABLE
ЭлементыTABLE = ДокументХТМЛ.ПолучитьЭлементыПоИмени("curr_tab");
Переменная Location при Ресурс = "www.bestchange.ru" становиться "https://www.bestchange.ru/www.bestchange.ru", при переходе на "https://www.bestchange.ru/www.bestchange.ru", становится "https://www.bestchange.ru/https://www.bestchange.ru/www.bestchange.ru".
Если Ресурс = "https://www.bestchange.ru", то Location будет равна "https://www.bestchange.ru/https://www.bestchange.ru", при переходе по этому адресу Location = "https://www.bestchange.ru/https://www.bestchange.ru/https://www.bestchange.ru"
Как же быть?))
Плиз, помогите! Ведь код есть, просто скопировать и попробовать. У меня уже нет вариантов как получить эту страницу... перепробовал все что было в голове... :-(