WEB SCRAPPING ERROR

[NIPUL JARIWALA]

Hello everyone,
I am trying to get some data form a web which I need daily and I lost lot of my time in it.
So I am trying to write a code to make my job easy.
For that I need to log in to the website.
But I am facing difficulty to login.
Please help me

my vba code:
Sub web_data()
Dim CH As Selenium.ChromeDriver
Set CH = New Selenium.ChromeDriver
CH.Start
CH.Get "Login Template Title"

CH.FindElementById("58:2;a").SendKeys "id"
CH.FindElementById("71:2;a").SendKeys "passwod"
CH.FindElementsByClass("slds-button slds-button--brand loginButton uiButton--none uiButton").Click 'here I face error
End Sub

I got an error on last line of code




And here is HTML code of element:

Please help me to solve my problem

Thank you

 

[SQUIDD]

Hi

try xpath

CH.FindElementByXPath("/html/body[1]/div[2]/div[2]/div/div[2]/div/div[3]/div/div[3]/button").Click

this replaces

CH.FindElementsByClass("slds-button slds-button--brand loginButton uiButton--none uiButton").Click    'here I face error

good luck

dave

 

[SQUIDD]

in fact, i tried it, it seems to work sometimes.

maybe due to page not loading

so try this.

Sub web_data()
Dim CH As Selenium.ChromeDriver
Set CH = New Selenium.ChromeDriver
CH.Start
CH.Get "https://giaportal.force.com/clientportal/s/login/?_ga=2.138811059.1290997332.1668610683-212414801.1667894107"

CH.FindElementById("58:2;a").SendKeys "id"
CH.FindElementById("71:2;a").SendKeys "passwod"

TRY_AGAIN:
On Error GoTo TRY_AGAIN
CH.FindElementByXPath("/html/body[1]/div[2]/div[2]/div/div[2]/div/div[3]/div/div[3]/button").Click
On Error GoTo 0

End Sub

 

[Anthony47]

Another option for that line:

CH.FindElementsByClass("loginButton")(1).Click

 

[NIPUL JARIWALA]

Thank you SQUIDD

Thank you Anthony47

both codes works