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

Question

我通过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

但我需要＆＃34; HTTP-EQUIV＆＃34;，＆＃34;内容＆＃34;，＆＃34; CHARSET＆＃34;而不是它的价值观。有没有办法获得标签中使用的属性？我尝试了很长时间。无法成功。

Answer 1

您可以遍历元素属性：

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

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