Имя: Пароль:
1C
 
Что за...? Новый COMОбъект("InternetExplorer.Application")
0 ollega
 
17.11.16
12:42
Написал следующий код:

appIE = Новый COMОбъект("InternetExplorer.Application");  
appIE.Visible = Истина;
url = "http://krasnoyarsk.n1.ru/search/?rubric=flats&is_newbuilding=true&page=2";;
appIE.Navigate(url);

Почему, когда открывается IE то сначала грузится именно этот адрес, который там и указан (с приставкой &page=2), загружает и даже показывает правильную страницу - 2ю.

А потом оно фигак и само грузится снова на первую страницу, хотя я этого не укаызвал!
1 ollega
 
17.11.16
12:45
Ахаха. Это происходит, даже когда этот URL я просто руками вставляю в IE.
Это IE настолько ... или я чего-то не понимаю?
в firefox вставляю url - всё норм
2 ollega
 
17.11.16
13:05
Дааа, это у меня версия IE 11 такая на головую больная. У друга на компе со старым IE норм всё.
3 Torquader
 
17.11.16
20:36
Поставь пустую страницу, как домашнюю и будет всё в порядке.
4 суперйцукен
 
17.11.16
22:44
А если пользователям нужны их родные выстраданные домашние страницы?
5 Torquader
 
17.11.16
22:46
(4) И в чём проблема - перед открытием убрать, а после открытия - восстановить.
6 суперйцукен
 
18.11.16
09:41
(5) Ну... Уж слишком много шагов получается. Осталось только комп менять.

Кроме того, вот открылся браузер, пусть из 1С, но ведь тот самый. А в нем нету их страницы. Как-то это не правильно.

Я уже это выслушал.
7 JeHer
 
18.11.16
10:16
(4) пусть юзают не IE.
8 ollega
 
19.11.16
13:10
(3) Грузит не домашнюю страницу) а тот же url, только без page=2 )
9 ollega
 
19.11.16
13:14
А вообще начал получать html код чисто 1С-кой:

Сервер = "yoursite.ru";            
Соединение = Новый HTTPСоединение(Сервер);            
    Заголовки = Новый Соответствие;
    Заголовки.Вставить("host", Сервер);           
    Запрос = Новый HTTPЗапрос(url, Заголовки);
    Ответ =Соединение.Получить(Запрос);
    Если Ответ.КодСостояния = 200 Тогда
// Данные получены, обрабатываем их
        ТекстСтраницы= Ответ.ПолучитьТелоКакСтроку();
        //Выведем тест полученной страницы
        //Сообщить(ТекстСтраницы);
        ТекURL = url;
    КонецЕсли;
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший