Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии / 2 сообщений из 2, страница 1 из 1
14.06.2007, 06:29
    #34593440
eugene2009
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии
Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии
Как послать клик мыши в веббраузер, проблема в том что когда шлю sendmessage то он кликает если простоя страничка хтмл без iframe/frame. НА фрейм или ифрейм не кликает
Помогите советом!
Я не хочу парсить хтмл страницу и кликать так body.outerhtml, tagname ("A").click

Private Sub Command2_Click()

Dim lHandle As Long
lHandle = GetHandle(ie)
MsgBox lHandle

SendClick lHandle, Val(Text2.Text), Val(Text3.Text)
End Sub

Public Sub SendClick(lnghWND As Long, X As Long, Y As Long)
Dim lngResult As Long
Dim lnglParam As Long
lnglParam = (Y * &H10000) + X
lngResult = SendMessage(lnghWND, WM_LBUTTONDOWN, 0&, ByVal lnglParam)
lngResult = SendMessage(lnghWND, WM_LBUTTONUP, 0&, ByVal lnglParam)
txtlog.Text = lnghWND & " " & X & " " & Y & vbCrLf & txtlog.Text
End Sub


Модератор: Одной темы вполне достаточно, не нужно размазывать один вопрос на несклько топиков.
...
Рейтинг: 0 / 0
14.06.2007, 09:31
    #34593635
marvan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]