Модераторы: MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Сообщения системы безопасности, система безопасности 
:(
    Опции темы
Gess
Дата 19.12.2007, 10:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



Хотелось бы решить следующую "проблему"
При работе со страницей
WebBrowser1.Navigate('https://www.np-ats.ru/reports.jsp?part=1')
возникает следующее сообщение
user posted image
такое же "безобразие" и при попытке получить файл с сайта
user posted image
перерыл инет, ни настройки браузера, ни отключение всего в "Центре безопасности" проблему не решают.
Как избавиться от этих назойливых сообщений?
PM MAIL   Вверх
Snowy
Дата 19.12.2007, 13:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 4
Всего: 484



Ну так и должно быть.
IE обязан предупреждать, если ты подключаешься по "как бы защищённому каналу, но реально не дающему защиты информации".
PM MAIL   Вверх
Gess
Дата 19.12.2007, 14:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



Ну раз так, если эти сообщения не "погасить" smile ,
тогда как програмно нажимать кнопочку "Да" при каждом появлении подобных сообщений?
... и как в Delphi отследить появление этих сообщений?
PM MAIL   Вверх
MetalFan
Дата 19.12.2007, 15:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



попробуй EmbeddedWB. он вроде бы умеет "гасить" всяческие сообщения.

Это сообщение отредактировал(а) MetalFan - 19.12.2007, 15:10


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Gess
Дата 19.12.2007, 15:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



компонент скачал, ищу описание...
может есть у кого на рус. яз? (да с примерами smile ), понятно что на форуме есть, но хотелось бы полное
в DRKB нету smile 
PM MAIL   Вверх
MetalFan
Дата 19.12.2007, 15:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



все бы вам на рус.яз... учи английский, если программировать хочешь


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Gess
Дата 19.12.2007, 17:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



никак... smile 

при TWebBrowser это событие  OnNewWindow2? никакой реакции.
тоже самое и при  EmbeddedWB.
так дело в том что у меня предупреждение выскакивает до загрузки страницы.
в инете нашел что подобные сообщения никоим образом отключитьнельзя (хотя я сомневаюсь - не бывает так чтобы нельзя). 
ну да ладно, тогда пойдем другим путем. Каким образом определить что это за объект выскакивает (и вообще отследить что что-то выскакивает) (сообщение), определить его свойства и т.п.? Тогда можно будет нажать кнопочку "да"на сообщении и ехать дальше потихоньку.

PM MAIL   Вверх
MetalFan
Дата 19.12.2007, 18:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



что за страница?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Gess
Дата 19.12.2007, 20:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



PM MAIL   Вверх
Snowy
Дата 20.12.2007, 12:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 4
Всего: 484



Цитата(Gess @  19.12.2007,  17:31 Найти цитируемый пост)
Каким образом определить что это за объект выскакивает
Никаким.
Его выкидывает WB модально. То есть, пока окошко висит, основной тред стопорится.
Или ты хочешь запустить второй тред и ждать появления этого окошка, чтобы потом нажать кнопочку?
Дохлый номер - в разных виндах, с разными IE, окно может быть совершенно различным.
Это не решение, а так... Затычка для конкретной системы.
Могу посоветовать задать вопрос в разделе по виндам.
Ибо это вопрос скорее к IE, чем к дельфи.
Вероятно можно как-то установить данный ненадёжный сертификат так, чтобы винда в него уверовала...
А вообще - это проблема данного сервера.
Какой смысл вообще было делать ssl, если у них нет сертификата?
С самопальным сертификатом это не защита, а так... Видимось оной.
При желании вскрывается моментально.
PM MAIL   Вверх
MetalFan
Дата 20.12.2007, 12:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



можно внести изменения в TEmbeddedWB, чтобы он сам жал Yes.
у него есть св-во DialogBoxes.DisableAll.
если его выставить, то окно о сертификате вообще не появится, но и на сайт не зайдется...
в общем предлагаю решение "влоб". добавить еще один флаг TryClickYes и соотв его обработку:
Код

unit EmbeddedWB;
...
   TDialogBoxes = class(TPersistent)
   private
...
      FTryClickYes: Boolean;
   published
...
      property TryClickYes: Boolean read FTryClickYes write FTryClickYes;
   end;
...
procedure TEmbeddedWB.FormWndProc(var AMsg: Messages.TMessage);
...
               if (DlgName = '#32770') or (DlgName = 'Internet Explorer_TridentDlgFrame') then
                  begin
//===========================
                     if FDialogBoxes.TryClickYes then
                     begin
                       lBtn := FindWindowEx( PopHandle, 0, 'Button', nil );
                       if lBtn <> 0 then
                         SendMessage( lBtn, BM_CLICK, 0, 0 );
                     end
                     else
//===========================
                     if FDialogBoxes.FDisableAll then
                        SendMessage(PopHandle, WM_CLOSE, 0, 0);


такое решение у меня прекрасно отработало на твоем сайте.
в аттаче измененный TEmbeddedWB

Присоединённый файл ( Кол-во скачиваний: 15 )
Присоединённый файл  EmbeddedWB.pas 85,28 Kb


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Gess
Дата 20.12.2007, 13:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 17.12.2007
Где: Москва

Репутация: нет
Всего: нет



почитал кое что на тему сертификатов.
Оказывается чтобы данные сообщения не выскакифали, сертификат владельца сайта должен быть зарегистрирован у microsoft, что естественно стоит денежек и немалых. А так это действительно "самопал" который никакую информацию не защищает, а только создает видимость и мешает работе. 
Пойду в раздел по виндам, может найду способ заставить уверовать IE в отдельновзятый самопальный сер., ато так -не жизнь!

Добавлено через 2 минуты и 44 секунды
поторопился....я
MetalFan огромное спасибо за пример smile , 
брошу работу, буду в течении дня пробывать
PM MAIL   Вверх
MetalFan
Дата 20.12.2007, 13:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



Gess, см.выше. чем не решение?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
E_v_g
Дата 23.1.2008, 13:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 76
Регистрация: 15.11.2006

Репутация: нет
Всего: нет



Была такая же проблема. Решил так:

Код

procedure TForm1.Timer2Timer(Sender: TObject);
var
  w : HWND;
  TheChildHandle: HWND;
begin
  w := FindWindow(nil, 'Предупреждение системы безопасности');
  TheChildHandle := FindWindowEx(w, 0, nil, PChar('Д&а'));
  SendMessage(TheChildHandle, WM_LButtonDown, 1, 1);
  SendMessage(TheChildHandle, WM_LButtonUP, 1, 1);
end;



Не знаю, насколько правильно, главное, работает!  smile
PM ICQ   Вверх
MetalFan
Дата 23.1.2008, 14:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 3
Всего: 128



E_v_g, а если винда нерусская?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: ActiveX/СОМ/CORBA"

Rrader
Girder

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Delphi
  • Вопросы по SQL и вопросы по базам данных, не связанные с Delphi, задавать здесь

Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема »


 




[ Время генерации скрипта: 0.0558 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.