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