.net - vbScript System.Collections.ArrayList 对象不支持... list.Add

Question

我在使用 CreateObject("System.Collections.ArrayList") 解析 oList 对象时遇到问题

我在 vbscript 中得到的错误

"Microsoft VBScript runtime error: Object doesn't support this property or method: 'list.Add'"

基于 this教程 我知道您可以在 vbscript 中使用 COM 包装的 .Net 组件；那为什么这行不通呢？

附加信息:

当我在 VS08 中调试并向列表中添加 watch 时，它说 无法计算子项。

objNode.value 的监视具有两个字符串值。 (这是预期的行为)

Function ProcessXML(oXML) 
  STOP
  xPathExemptions= "//Exemption/@ExemptCodeWord"
  Dim xmlDoc : Set xmlDoc = CreateObject("MSXML2.DOMDocument.6.0")
  xmlDoc.Async = False
  xmlDoc.loadXML(oXML)
 
  Dim colNodes 
  Set colNodes = xmlDoc.selectNodes(xPathExemptions)
  Dim oList
  Set oList = CreateObject("System.Collections.ArrayList")
  Dim objNode
  
  For Each objNode in colNodes
    oList.Add = objNode.value
  Next
  
  'ProcessExemptions = CStr(xmlDoc.selectNodes(xPathExemptions))

End Function 

如果您对我的vbscript有什么意见；请让我知道 - 刚开始学习，不知道最佳做法。

Answer 1

变化:

oList.Add = objNode.value

...到:

oList.Add objNode.value

或 (感谢@Ansgar 的指导)

Call oList.Add(objNode.value)

这是一个演示:

Option Explicit

Dim oList : Set oList = CreateObject("System.Collections.ArrayList")

oList.Add "Banana"
oList.Add "Apple"
oList.Add "Orange"
oList.Add "Grapes"
oList.Add "Plum"

oList.Sort

Dim oItem
For Each oItem In oList
    WScript.Echo oItem
Next

预期输出:

Apple
Banana
Grapes
Orange
Plum

您可以在 Eric Lippert 的 informative article 中找到有关 VB 和 VBScript 的使用圆括号的古怪规则的更多信息.