Error automating website data entry as the website is still loading

后端 未结 3 1828
悲&欢浪女
悲&欢浪女 2021-01-25 09:49

I have code which picks up data from multiple columns from ThisWorkbook and puts in various field in website in internet explorer. The website loads after clicking on <

3条回答
  •  情话喂你
    2021-01-25 10:20

    Use proper page load waits after each .Navigate and .Click.

    While ie.Busy Or ie.readyState < 4: DoEvents: Wend
    

    Also, you can wrap elements that are throwing errors, related to timings, in timed loops which attempt to set the object reference

    Dim t As Date, ele As Object
    Const MAX_WAIT_SEC As Long = 10
    
    t = Timer
    Do
        On Error Resume Next
        Set ele = doc.getElementById("ContentPlaceHolder1_GridView1_chkboxSelectAll")
        On Error GoTo 0
        If Timer - t > MAX_WAIT_SEC Then Exit Do
    Loop While ele Is Nothing
    
    If Not ele Is Nothing Then
        ele.Click
    End If
    

提交回复
热议问题