html - 无法使用 VBA 访问 HTML 框架内的表单

Question

Set resultClasses = IeUsps.document.getElementsByTagName("FRAME") 
    For Each resultClass In resultClasses 
        MsgBox resultClass.Name 
    Set resultClasses1 = IeUsps.document.getElementsByTagName("form")           
         For Each resultClass1 In resultClasses1     
            MsgBox resultClass1.Name    
        Next resultClass1        
 Next resultClass

我有上面的代码，当我运行上面的代码时，我可以看到所有框架的名称，但看不到每个框架内的表格。我必须访问，在所需的表单内，在一些输入标签内。请帮忙。

Answer 1

未经测试：

Sub Tester()

    Dim resultClasses, resultClass, resultClasses1, resultClass1

    Set resultClasses = IeUsps.document.getElementsByTagName("FRAME")
    For Each resultClass In resultClasses
        MsgBox resultClass.Name
        Set resultClasses1 = resultClass.document.getElementsByTagName("form")
        For Each resultClass1 In resultClasses1
            MsgBox resultClass1.Name
        Next resultClass1
    Next resultClass
End Sub

Answer 2

不久前我遇到了同样的问题。如果您想在按下按钮后访问框架中的数据，您应该等待页面加载。按下按钮后，只需将以下内容添加到您的代码中：

    Dim Bongeszo As InternetExplorer
    Do
    Application.Wait DateAdd("s", 0.1, Now)
    Loop Until Bongeszo.document.readyState = "complete"

等待页面加载后，我可以访问框架内的所有信息。让我们知道它是否对您有帮助。