
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
14.06.2007, 06:29
|
|||
|---|---|---|---|
|
|||
Я хочу невидимо контроллировать webbrowser control iwebbrowser2 в своём приложнии |
|||
|
#18+
Я хочу невидимо контроллировать 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 Модератор: Одной темы вполне достаточно, не нужно размазывать один вопрос на несклько топиков. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=60&mobile=1&tid=2163867]: |
0ms |
get settings: |
5ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
53ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
| others: | 212ms |
| total: | 334ms |

| 0 / 0 |
