0

当我对所有搜索结果进行for进入第一个输出页面并提取数据并退出它进入下一个输出时,但重复第一个产品的输入,所以我尝试创建一个for进入下一个输出,不一样的输出。

这是我的尝试:

Try
            For Each webElement2 As IWebElement In Me.driv.FindElements(By.XPath("//*[@class='MVVflb-haAclf V0h1Ob-haAclf-d6wfac MVVflb-haAclf-uxVfW-hSRGPd']"))
                Dim flag2 As Boolean = Operators.CompareString(Me.ttt.Text, "", False) = 0
                If flag2 Then
                    Me.ttt.Text = webElement2.ToString
                Else
                    Me.ttt.AppendText(Environment.NewLine + webElement2.ToString())
                End If
                Application.DoEvents()
            Next
        Catch ex As Exception
        End Try

        Dim flag3 As Boolean = Me.nnm <= Me.ttt.Lines.GetUpperBound(0)
        If flag3 Then
            Try
            
                For Each webElement3 As IWebElement In Me.driv.FindElements(By.Id(ttt.Lines(nnm)))
                    Dim flag4 As Boolean = Operators.CompareString(webElement3.ToString(), Me.ttt.Lines(Me.nnm).ToString(), False) = 0
                    If flag4 Then
                        Try
                            webElement3.Click()
                            Exit Try
                        Catch ex3 As Exception
                        End Try
                    End If
                Next
            Catch ex As Exception
            End Try
            Me.Timer3.Start() 
4

0 回答 0