

WebBrowser1.Navigate "сайт_на_котором_заполняем_полЯ"
Do While WebBrowser1.Busy '
DoEvents
Loop
On Error Resume Next
WebBrowser1.Document.All("login").Value = j
WebBrowser1.Document.All("password").Value = q
WebBrowser1.Document.All("submit").Click


Private Sub Command1_Click()
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate "Сайт который заполняем"
While objIE.Busy
Wend
objIE.ToolBar = False
objIE.StatusBar = False
objIE.Resizable = False
objIE.Visible = 1
objIE.Document.All("submit").Click
End Sub


Space писал(а):да нет. IE запускается сам по себе (как стороннее приложение), и в нём я уже ищу поля.










Если нельзя получить ID поля Edit
.<input id="submit"

Хорошо, я получил хендл окна <INPUT TYPE="TEXT"> или <INPUT TYPE="PASSWORD">.




Space писал(а):если ID указан в тегах, то он должен быть где-то и в свойствах окна. Ведь именно по нему идёт обращение к окну. Хендл - через AttachThreadInput и GetFocus.


WebBrowser1.Document.All("login").Value = jДействительно, хендл не меняется.C чего ты взял, что хендл, который ты получаешь, это хендл EDIT'а, а не контейнера?

В том то и вопрос, как найти этот нужный элемент. Как его идентифицировать?Даем допустим фокус мазиле и табом перебираем до нужного элемента и вставляем.

Space писал(а):а это что такое, Хакер?
Тогда что остаётся делать?


<input name="login" type="text" />WebBrowser1.Document.All("login").Value = j

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