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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Клик по кнопке на окне, Нейтрализатор отладчика IE 
V
    Опции темы
bom
Дата 9.4.2008, 14:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 329
Регистрация: 22.2.2004
Где: Казахстан, Алматы

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



И не должно. Это не окно стандартного отладчика IE, о котором речь шла в предыдущих сообщениях.
Похоже на диалог Microsoft Script Debugger-а или Редактора Web-сценариев из пакета MS Office.
PM MAIL   Вверх
ProgramerForever
Дата 9.4.2008, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



А как его убивать?
PM MAIL WWW ICQ   Вверх
Rrader
  Дата 9.4.2008, 16:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Inspired =)
***


Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

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



Код

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Private Sub Command1_Click()
PostMessage FindWindow("#32770", "Ошибка"), &H10, 0&, 0&
End Sub



--------------------
Let's do this quickly!
Rest in peace, Vit!
PM MAIL Skype   Вверх
ProgramerForever
  Дата 9.4.2008, 17:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



Не-а. Не работает. Объясните, откуда #32770 и "Internet Explorer_TridentDlgFrame"??

Нашёл и понял сам. Смог с помощью программки определить класс окна. Смог найти это окно. Но не смог найти кнопку &Нет на ней...
Код

WndWind = FindWindow("#32770", "Ошибка")
MsgBox Str(WndWind)' Показывает число
WbdButton = FindWindowEx(WndWind, WndWind, "&Нет", vbNullString)
MsgBox Str(WbdButton)'Показывает 0
Call SendMessage(WbdButton, BM_CLICK, 0, 0)


Нашёл! Ура! Вместо
Код

WbdButton = FindWindowEx(WndWind, WndWind, "&Нет", vbNullString)

надо было писать
Код

WbdButton = FindWindowEx(WndWind, 0, "Button", "&Нет")


Это сообщение отредактировал(а) ProgramerForever - 9.4.2008, 17:46
PM MAIL WWW ICQ   Вверх
ProgramerForever
  Дата 10.4.2008, 10:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



Вопрос решён. Спасибо всем за помощь!
PM MAIL WWW ICQ   Вверх
Страницы: (3) Все 1 2 [3] 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

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

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

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


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

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


 




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


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

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