首页 > 解决方案 > 刷新后从页面下载数据

问题描述

使用 selenium chrome 驱动程序翻译文本。翻译文本后我无法检索数据。我的代码:

    Dim Chrom As New Selenium.ChromeDriver
    Dim kol As Selenium.WebElements
    Dim elem As Selenium.WebElement
    
    Chrom.START
    Chrom.Get "https://www.deepl.com/pl/translator"
    
    Set kol = Chrom.FindElementsByTag("textarea")
    For Each elem In kol
        If elem.Attribute("dl-test") = "translator-source-input" Then
            elem.SendKeys "The Formula 1 fans offcourse want a real Ferrari on their cake"
        End If
    Next
    Debug.Print Chrom.FindElementById("target-dummydiv").Text

作用效果:无。我该如何解决我的问题。马立克

标签: vba

解决方案


推荐阅读