Имитация нажатия мыши в браузере на VB
Формулировка задачи:
Приветствую =)
Вот написал я простенький браузер на VB, загрузил страничку и есть на этой страничке одна нужная кнопка из "тысячи" других. Как имитировать нажатие мыши на эту кнопку? можно сказать авто-клик.. Нет ли примерчиков, вдруг уже кто то писал такого рода программы? Может есть пример на других языках программирования?
Решение задачи: «Имитация нажатия мыши в браузере на VB»
textual
Листинг программы
- Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, ByVal dwExtraInfo As Long) 'для клика правой кнопки мышки
- Private Const MOUSEEVENTF_LEFTDOWN = &H2: Private Const MOUSEEVENTF_LEFTUP = &H4
- '-----------------------------------------------------------
- xm=190: ym = 366:
- Call SetCursorPos(xm, ym): Call mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0): Call mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0):
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д