Имена пользователей из домена

[WorldMaster]

Здравствуйте, слепил небольшой скрипт для получения списка пользователей из домена:

Const ADS_SCOPE_SUBTREE = 2

Set file_object = CreateObject("Scripting.FileSystemObject")
Set list = file_object.CreateTextFile("./Rezult.txt")
Set objConnection = CreateObject("ADODB.Connection")
Set objCommand =   CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"

Set objCOmmand.ActiveConnection = objConnection

objCommand.CommandText = _
    "Select samaccountname, cn, displayName from 'LDAP://region.rism.loc' " _
        & "Where objectClass='user' and objectClass<>'computer'"  
objCommand.Properties("Page Size") = 1000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE 
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst

Do Until objRecordSet.EOF
   list.Write objRecordSet.Fields("samaccountname").Value & "  " & objRecordSet.Fields("displayName").Value & "  " & objRecordSet.Fields("cn").Value & vbCrLf
   objRecordSet.MoveNext
Loop

Он достает абсолютно все имена из домена. А как изменить его так чтобы он доставал имена и информацию только из определенной группы?

Группа называется R51.
В гугле чего то не нашел ничего, а нужно было сделать уже вчера.