Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Заполнить текстовое поле WebBrowser1, а ещё нажать кнопку 
:(
    Опции темы
eldar22
  Дата 17.4.2009, 00:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Вот код текстового поля 
сайт http://www.liga.net/links/add.html


Код

<tr><td align=right><b>URL:</b></td><td><input type=text name=url
    value="http://" size=33></td></tr>



А вот кнопки

Код

<input type=submit name=submit value="  Ok  ">


 smile 
PM MAIL WWW   Вверх
Akina
Дата 17.4.2009, 07:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Проще посмотреть заголовки и передаваемые по POST данные по нажатию кнопки, и отправить то же, но со своими данными.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
eldar22
Дата 17.4.2009, 09:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Да  я это знаю, но мне надо заполнить поле WebBrowser1 
Я где такое уже делал давно, но найти не могу не помню кода 
PM MAIL WWW   Вверх
Akina
Дата 17.4.2009, 09:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Цитата(eldar22 @  17.4.2009,  10:05 Найти цитируемый пост)
найти не могу не помню кода  

то есть ни одна из тем, выдаваемых поиском по слову webbrowser в разделе по VB6 на форуме, не подходит? или не искал?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
eldar22
  Дата 17.4.2009, 11:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Искал но не подходит не работает
Вот на делфи  как должно выглядить
Код

procedure TForm1.Button1Click(Sender: TObject);
var
    A:Variant;
begin

    A:= WebBrowser1.OleObject.Document.getElementById('url'); // Поле для ввода имени пользователя
    A.Value:= Edit1.Text;
      A:= WebBrowser1.OleObject.Document.getElementById('submit'); // Ну и кнопочка для входа
    A.Click;



end;


procedure TForm1.FormCreate(Sender: TObject);
begin
 WebBrowser1.Navigate('http://www.liga.net/links/add.html');
end;

end.


А как на visual basic организовать это?
PM MAIL WWW   Вверх
Akina
Дата 17.4.2009, 12:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



ну, видимо что-то вроде
Код

dim doc as object
set doc=WebBrowser1.Document
dim a as object
set a=Document.getElementById('url')
A.Value= Text1.Text
Попробуй... спроси, если что, недостающую инфу у objectbrowser или там посмотри его структуру в locals при отладке...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
eldar22
  Дата 17.4.2009, 14:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Akina спасибо

Но только есть не большая ошибка в вашем коде я её исправил и вот что получилось

Код

Dim doc As Object
Dim a As Object
Set doc = WebBrowser1.Document
 Set a = WebBrowser1.Document.getElementById("url")
a.Value = Text1.Text



Это сообщение отредактировал(а) eldar22 - 17.4.2009, 14:14
PM MAIL WWW   Вверх
Akina
Дата 17.4.2009, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

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



Цитата(eldar22 @  17.4.2009,  15:13 Найти цитируемый пост)
вот что получилось

Ну тогда строки 1 и 3 просто не нужны...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
eldar22
Дата 17.4.2009, 18:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Нет главное работает smile 
PM MAIL WWW   Вверх
eldar22
Дата 17.9.2009, 10:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



У меня тут вопрос по теме.
Если на странице иметься два поля с name="url"  то тогда как заполнить эти два поля?
PM MAIL WWW   Вверх
neic
Дата 17.9.2009, 22:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



eldar22, можно ID поискать каждых. Где-т выкладывал программулину для этого.
PM MAIL WWW ICQ Skype   Вверх
aclips
Дата 18.4.2011, 03:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Можно так:
Код

WebBrowser1.Document.GetElementById("url").innerText = "что вводить"


Это сообщение отредактировал(а) aclips - 18.4.2011, 03:39
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

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


 




[ Время генерации скрипта: 0.0913 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.