Hello everyone,
I want to access from my Access app to an email (the idea is to make like a license, if it can get in, it shows the "password" is still working as well as the license), if not I will add to close IE and Application.quit
The issue I have is that I cannot find the "id" of the login button
on the webpage using inspect element and I don't know if there is an other option than getElementById or maybe I am doing something wrong on the identification of my login button on the website https://mail.ionos.mx/
Code:
Sub Key()
Dim email As String
Dim password As String
' open IE, navigate to the desired page and loop until fully loaded
Set IE = CreateObject("InternetExplorer.Application")
my_url = "https://mail.ionos.mx/"
IE.Visible = 1
'apiShowWindow IE.hwnd, SW_MAXIMIZE
apiShowWindow IE.hwnd, SW_SHOWMINIMIZED
With IE
.Visible = True
.Navigate my_url
Do Until Not IE.Busy And IE.ReadyState = 4
DoEvents
Loop
End With
' Input the userid and password
IE.Document.getElementById("login-form-user").Value = "name@domain.com.mx"
IE.Document.getElementById("login-form-password").Value = "pssword#!"
' Click the "login" button
'Here is my issue I cannot find the id for the button
IE.Document.getElementsById("submit").Click
Do Until Not IE.Busy And IE.ReadyState = 4
DoEvents
Loop
End Sub
Further I would like to update this "Internet Explorer to Edge or Chrome"....
Thanks in advance for the help!!!