在 VBScript 中将响应文本解析为 HTML

Question

我正在尝试从 responseText 创建的字符串变量中检索 HTML Class 名称。我需要使用 VBscript 来完成此操作。这是当前代码的示例：

set http = createobject("Microsoft.XmlHttp")
    http.open "GET","http://www.xxxxxxxxxxx.com/xxx-xxx?xxxxNumber=xxxxx",false
    http.send ""

dim html : set html = CreateObject("HTMLFILE")
html.write http.responseText

dim trackdate : trackdate = html.getElementByClassName("tracking-history-date").[0].value
wscript.echo trackdate

我收到以下错误：对象不支持此属性或方法：'getElementByClassName'

Answer 1

我以前运行了解过这个。虽然documented，但getElementsByClassName()方法似乎并不实际支持。使用类似这样的方法解决此问题：

For Each el In html.getElementsByTagName("...")
  If el.ClassName = "tracking-history-date" Then
    Set trackdate = el
    Exit For
  End If
Next

在 VBScript 中将响应文本解析为 HTML

Parse a responseText to HTML in VBScript

vbscript

dom

xmlhttprequest