Передача ctrl+F элементу WebBrowser

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
vice4
Новичок
Новичок
 
Сообщения: 39
Зарегистрирован: 31.05.2011 (Вт) 7:01

Передача ctrl+F элементу WebBrowser

Сообщение vice4 » 31.05.2011 (Вт) 7:10

Добрый день.
Пишу программу на VB6. Имеется элемент WebBrowser, отображающий html-страницу. Необходимо выполнить поиск в данном элементе некоторого текста - вводится через TextBox. И при удачном поиске выделить найденное слово в html-странице.
Дабы не изобретать велосипед, решил использовать встроенные возможности контрола - ПОИСК, запускаемый при нажатии Ctrl+F. Вопрос как запустить ПОИСК автоматически после загрузки страницы, т.е. имитировать нажатие горячих клавиш. Пробовал через sendkey "^{F}" - результато не дало.
Заранее спасибо.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Re: Передача ctrl+F элементу WebBrowser

Сообщение alibek » 31.05.2011 (Вт) 7:36

В компоненте WebBrowser ведь есть отправка команд.
Надо использовать ее.
Lasciate ogni speranza, voi ch'entrate.

vice4
Новичок
Новичок
 
Сообщения: 39
Зарегистрирован: 31.05.2011 (Вт) 7:01

Re: Передача ctrl+F элементу WebBrowser

Сообщение vice4 » 31.05.2011 (Вт) 7:38

alibek писал(а):В компоненте WebBrowser ведь есть отправка команд.
Надо использовать ее.

Вы имеете ввиду .WebBrowser1.ExecWB?

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Re: Передача ctrl+F элементу WebBrowser

Сообщение alibek » 31.05.2011 (Вт) 9:00

Да.
Lasciate ogni speranza, voi ch'entrate.

vice4
Новичок
Новичок
 
Сообщения: 39
Зарегистрирован: 31.05.2011 (Вт) 7:01

Re: Передача ctrl+F элементу WebBrowser

Сообщение vice4 » 31.05.2011 (Вт) 9:58

Код: Выделить всё
WebBrowser1.ExecWB OLECMDID_FIND, OLECMDEXECOPT_DODEFAULT

помогло, спасибо за совет


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 51

    TopList