Hacer click en boton web
Publicado por achill (1 intervención) el 04/04/2021 21:02:49
Hola, buenas tardes. Estoy tratando de hacer un código que me ayude a iniciar sesión en una pagina web, ya logre que transfiera usuario y contraseña pero tengo problemas con hacer que de click en el botón de inicio de sesión.
Ojala alguien pudiera ayudarme.
Este es el código con el que abro internet y subo usuario y contraseña.
https://www.loungegateway.com/loungegateway/images/new_icons/login1.gif
Y la anterior es la URL de la imagen que es el botón.
De antemano muchas gracias y quedo al pendiente por si me falta información.
Ojala alguien pudiera ayudarme.
1
2
3
4
5
6
7
8
9
10
11
12
Sub Login()
Dim i As SHDocVw.InternetExplorerSet i = New InternetExploreri.Visible = True
i.navigate ("https://www.loungegateway.com/loungegateway/Login/dsp_login.cfm")
Do While i.readyState <> READYSTATE_COMPLETE
Loop
Dim idoc As MSHTML.HTMLDocumentSet idoc = i.document
idoc.all.j_username.Value = "****"
idoc.all.j_password.Value = "*****"
End Sub
Este es el código con el que abro internet y subo usuario y contraseña.
https://www.loungegateway.com/loungegateway/images/new_icons/login1.gif
Y la anterior es la URL de la imagen que es el botón.
De antemano muchas gracias y quedo al pendiente por si me falta información.
Valora esta pregunta
0