Войти в Интернет с помощью JavaScriptHtml

Программисты Html
Ответить
Anonymous
 Войти в Интернет с помощью JavaScript

Сообщение Anonymous »

Я часами искал разные способы входа в Интернет для парсинга, но так и не нашел. Последнее, что я пробовал, это следовать этой теме, но все равно безуспешно....

Это мой код:

Код: Выделить всё

Option Explicit
Sub DescargaInformes()

Dim ieApp As InternetExplorer
Dim ieDoc As Object
Dim ieTable As Object
Dim clip As DataObject
Dim oHTML_Element As Object

'creamos nueva instancia del IE y vamos a la web
Set ieApp = New InternetExplorer
With ieApp
.Navigate "https://mediamarkt.zendesk.com/access/unauthenticated"
.Visible = True
End With

'esperamos a que la web esté cargada
Do While ieApp.Busy: DoEvents: Loop
Do Until ieApp.ReadyState = READYSTATE_COMPLETE: DoEvents: Loop

Set ieDoc = ieApp.Document

'rellnamos los datos de login y pass
With ieDoc
.getElementById("user_email").Value = "user"
.getElementById("user_password").Value = "pass"
End With

'esperamos a que la web esté cargada
Do While ieApp.Busy: DoEvents: Loop
Do Until ieApp.ReadyState = READYSTATE_COMPLETE: DoEvents: Loop

Set ieDoc = ieApp.Document

End Sub
Может ли кто-нибудь указать мне правильное направление, как войти сюда?

Это (я думаю) код, который показывает пользователя и передает идентификаторы:

Код: Выделить всё

Correo electrónico

Contraseña


Изменить: здесь я получаю сообщение об ошибке .getElementById("user_email").Value = "user" требуется объект.

Подробнее здесь: https://stackoverflow.com/questions/562 ... ript-login
Ответить

Быстрый ответ

Изменение регистра текста: 
Смайлики
:) :( :oops: :roll: :wink: :muza: :clever: :sorry: :angel: :read: *x)
Ещё смайлики…
   
К этому ответу прикреплено по крайней мере одно вложение.

Если вы не хотите добавлять вложения, оставьте поля пустыми.

Максимально разрешённый размер вложения: 15 МБ.

Вернуться в «Html»