VBScript: получение значения из свойства объекта

Question

Я пытаюсь получить автоматически сгенерированную информацию из поля Notes группы AD и получить от нее определенное значение. Я могу найти нужную мне группу и вытащить данные с помощью Get («Информация»), но я застрял в том, как получить то, что мне нужно. Вот пример того, что я буду видеть:

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")