VPF::Как задать текст в Webbrowser - Форум программистов

anvarfromkz

Дата 28.12.2010, 18:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 14
Регистрация: 14.10.2010

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

В загрузке формы делаю

Код


Private Sub Form_Load()
w.Silent = True
w.Navigate "yandex.ru"
End Sub

Загружается яндекс
теперь нужно взять из текстового поля скажем Text1 текст и вставить в поле поиска яндекса, и потом нажать программно на кпопку поиск (найти)

Нашел как сделать

Код


Private Sub Command1_Click()
w.Document.getelementbyid("text").Value = "TEXT"
End Sub

Private Sub Command2_Click()
w.Document.getelementbyid("sbtn").Click
End Sub

w.Document.getelementbyid("sbtn").Click

Ура получилось надо было убрать
w.Silent = True
smile

Это сообщение отредактировал(а) anvarfromkz - 28.12.2010, 19:23

iff

Дата 28.12.2010, 22:33 (ссылка)

(нет голосов)

Загрузка ...

Администратор

Профиль
Группа: Участник
Сообщений: 949
Регистрация: 23.3.2007

Репутация: -1
Всего: 16

А еще можно запрашивать вот такой URL:

Код


http://yandex.ru/yandsearch?text=strsearsh

Где strsearsh - это поисковый запрос, и тогда вы получите результат поиска

--------------------

DOS... Синей пеленой экран заполнил чистый DOS
Мышь... Стала вдруг квадратной, потеряла форму мышь...
Я разбил окно, девяностопятое мастдайное окно,
И поставил DOS, и тогда увидел: Это счастье, — вот оно.

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