使用 Vba 查找 HTML 标记内使用的属性答案

【问题标题】：Using Vba find the attributes used inside a HTML tag使用 Vba 查找 HTML 标记内使用的属性
【发布时间】：2015-02-02 15:02:30
【问题描述】：

我正在通过 vba 解析 HTML 代码。我没有读取 HTML 文件，而是获取已经打开的 IE 的对象并解析 HTML。现在，我可以获得标签名称及其属性值。但我无法找到使用的属性。例如，

META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=iso-8859-1"

在这个META标签中，我可以通过使用获取属性值

For Each a In ie.document.all.tags("META")
 Debug.Print a.getAttribute("content")
Next

但我需要“HTTP-EQUIV”、“CONTENT”、“CHARSET”而不是它的值。有没有办法获得标签中使用的属性？我尝试了很长时间。没能成功。

【问题讨论】：

你试过循环遍历a.attributes 吗？
@Tim Williams 我刚试过，我可以得到属性。谢谢你。但我得到的是所有属性，而不是已经使用的属性。我这样循环For Each q In a.Attributes Debug.Print q.Name & q.Value Next

【解决方案1】：

你可以循环遍历元素属性：

Dim a
For Each a In ie.document.all.tags("META").attributes
 Debug.Print a.value
Next

编辑：列出所有可能的属性，甚至是未使用的属性。我认为这就是它在 IE 中的工作方式 - 您必须通过检查是否有值来过滤掉实际使用的那些，或者尝试检查每个属性的 specified 属性值。

【讨论】：