Ошибка при выполнении запроса LDAP

Question

Я получаю сообщение об ошибке при попытке выполнить запрос с помощью VBS

Если удалить strWhereOU части запроса, то она работает, так что проблема где-то там, но я не Не знаю, где. Любой указатель присваивается. Благодарю.

Я использую этот код для получения запроса -

For i = 0 To Ubound(arrIncludeOU) 
    arrIncludeOU(i) = "ADsPath LIKE '%OU=" & Trim(arrIncludeOU(i)) & "%'" 
Next 
strWhereOU = "AND (" & Join(arrIncludeOU, " OR ") & ") " 

'** Set the query string and parameters *' 
objCommand.CommandText = _ 
    "SELECT Name, operatingSystem, ADsPath, lastLogonTimeStamp " & _ 
    "FROM 'LDAP://" & strDomain & "' " & _ 
    "WHERE objectClass = 'computer' " & strWhereOU & _ 
    "ORDER BY Name" 
objCommand.Properties("Page Size") = 1000 
objCommand.Properties("Searchscope") = 2 
objCommand.Properties("Timeout") = 30 
objCommand.Properties("Cache Results") = False 

'** Execute the query *' 
Set objRecordSet = objCommand.Execute 

Вот запрос, который производится -

А вот ошибка, которую я получаю -

Answer 1

Эта проблема вызывает проблему LIKE %, но это также шаблон шаблона Adspath.

Соответствующий шаблон используется здесь ='*', но, похоже, вы не можете выполнять поиск подстановочных знаков против Adspath (или differName). Вы можете использовать подстановочный знак для имени, CN или других атрибутов (WHERE Name ='Smith*'), но это вам не поможет.

Вам необходимо изменить свое местоположение FROM на что-то вроде этого.

strOU = "OU=Sherborne Desktops," 
"FROM 'LDAP://" & strOU & strDomain & "' " & _ 

Прочитайте эту страницу для получения дополнительной информации определение http://technet.microsoft.com/en-us/library/ee692831.aspx