WebBrowser

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

WebBrowser

Сообщение arechemist » 28.03.2010 (Вс) 9:14

разбираюсь с объектом WebBrowser.
Пытаюсь программно залогиниться на сайте diary.ru
пишу

Dim b As Object
b = WebBrowser1.Document.GetElementById("usrlog2")
b.innertext = "asdlfkj"
b = WebBrowser1.Document.GetElementById("usrpass2")
b.innertext = "9283792874928373"

логин и пароль вводяца туда куда и надо, но немогу понять как нажать на кнопку "войти". подскажите пожалуйста.

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: WebBrowser

Сообщение Хакер » 28.03.2010 (Вс) 9:16

Найти соответствующий DOM-узел и вызвать у него метод click.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

arechemist
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 173
Зарегистрирован: 24.10.2003 (Пт) 8:45

Re: WebBrowser

Сообщение arechemist » 28.03.2010 (Вс) 9:28

Да вот я никак и не могу его найти =((((

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: WebBrowser

Сообщение Хакер » 28.03.2010 (Вс) 9:40

Мы не можем ничего сделать с тем, что кто-то не может что-то найти.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

arechemist
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 173
Зарегистрирован: 24.10.2003 (Пт) 8:45

Re: WebBrowser

Сообщение arechemist » 28.03.2010 (Вс) 10:05

Спасибо ) разобрался

нашел

Код: Выделить всё
        For Each FormElem As HtmlElement In WebBrowser1.Document.All

            If FormElem.GetAttribute("value") = "Войти" Then
                FormElem.InvokeMember("click")
            End If
           

        Next

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: WebBrowser

Сообщение Хакер » 28.03.2010 (Вс) 10:07

Этот код не является кодом на VB6.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.


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

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

Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 75

    TopList