Excel VBA-XMLHTTP：如何引用没有ID，只有名称的按钮

Question

我一直在尝试使用Excel VBA登录网站

用户名和密码字段可以正常工作

这是单击按钮给我的问题

该按钮没有“ ID”而是名称

见图片：

查看突出显示的行

Dim siteDoc As Object
Set siteDoc = appIE.document

   siteDoc.getElementById("xName").Value = "user"
   siteDoc.getElementById("xPassword").Value = "password"
   siteDoc.getElementById("loginbutton").Click

我在以下位置收到“运行时424对象必需”错误： siteDoc.getElementById("loginbutton").Click

编辑：在检查元素“控制台”中，它返回一个node list

编辑：

什么有效：

Set buttonObject = siteDoc.getElementsByName("loginbutton")
For Each btnObj In buttonObject
    btnObj.Click
Next btnObj

Answer 1

您可以找到按钮的集合（类名“按钮”）并循环浏览，直到获得名称属性“ loginbutton”

1. 分配IHTMLElementCollection（ Set Buttons= doc.getElementsByClassName("button") ）

2. 遍历Buttons对象以找到登录按钮-您的整个代码如下所示：

   子示例（）

   设置按钮= doc.getElementsByClassName（“ button”）

   对于按钮中的每个oElement如果oElement.getAttribute（“ name”）=“ loginbutton”然后'这个oElement是您的按钮，因此您的操作将在此处进行以下操作'........

   结束子

将oElement和Buttons声明为对象