MSC .getElementById vs .getElementsByClassName

Question

我目前遇到了一些问题，因为我无法为我的Excel创建一个合适的VBA代码来从单元格到特定网站输入数据。你能帮帮我吗？

Sub MSC()

    Dim OrgBox As HTMLInputElement
    Set objIE = New SHDocVw.InternetExplorer
    objIE.navigate "http://www.mscgva.ch/tracking/index.html"
    objIE.Visible = True
    Do While objIE.readyState < 4: Loop

    Set OrgBox = objIE.getElementById("InputBox")
    OrgBox.Value = Range("a1")
    OrgBox.form.submit

End Sub

Answer 1

您尝试控制的元素位于iframe中。要控制iframe中的元素，您需要从标记中提取src属性并导航到该URL

        ifr_url = ie.document.getElementsByTagName("iframe")(0).src

在您的情况下ifr_url =“http://tracking.mscgva.ch/msctracking.php”

在该网页上，您插入文字的代码应该有效。