vbscript - VBScript：从对象属性内部检索值

Question

我正在尝试从 AD 组的 Notes 字段中检索自动生成的信息并从中获取特定值。我能够找到我需要的组并使用 Get("Info") 提取数据，但我不知道如何从中获得我需要的东西。这是我将看到的示例：

Value1=True
Value2=name@domain.org
Value3=Something Else

我需要做的是找到 Value2 并将其放入变量中。我以前用文本文件做过这个，但这似乎有点不同，我很难过。

编辑：要清楚，这是基本代码：

Set objGroup = GetObject("LDAP://cn=Group Name,ou=Groups,dc=domain,dc=org")
wscript.echo objGroup.Get("Info")

这将返回上面的示例。我需要从中找到“Value2”并将其值（在本例中为“name@domain.org”）放入一个新变量中。

Answer 1

未经测试：

For Each v In Split(objGroup.Get("Info"), vbNewLine)
  If LCase(Left(v, 6)) = "value2" Then
    a = Split(v, "=", 2)
    If UBound(a) = 1 Then var = Trim(a(1))
  End If
Next

Answer 2

您可以为变量赋值，如下所示：

Value3 = Get("info")