Как искать Однопользовательский Из LADP:
У меня есть метод, который будет искать конкретного пользователя в ADAM.
'set up the LDAP entry object
objEntry = New DirectoryEntry("LDAP://" & m_strLDAPServer & ":" & m_strLDAPPort & "/" & m_strLDAPEntry)
is the default but it must be set explicitly so that the props array can be passed in
objSearcher = New DirectorySearcher(objChild, "(objectClass=*)", strProps)
objSearcher.SearchScope = SearchScope.Base
objSearcher = New DirectorySearcher(objChild, "(objectClass=*)", strProps)
objSearcher.SearchScope = SearchScope.Base
'carry out the search
Try
objResult = objSearcher.FindOne()
Catch
objResult = Nothing
End Try
Я хочу получить результаты из ADAM SQL: как "% strUserName%", но я нашел только метод FindOne (), который выполняет поиск только по полной строке "strUserName", но не выполняет операцию "Мне нравится" в SQL. Любая идея Как я могу искать как SQL LIKE?
1 ответ
Решение
Работает нормально:
eobjEntry = New DirectoryEntry("LDAP://" & m_strLDAPServer & ":" & m_strLDAPPort & "/" & "cn=" & txtUserName & "," & m_strLDAPEntry)
'set the user name and password, if necessary
Dim search As New DirectorySearcher()
'here search & txtUserName & works SQL Like Operation objSearcher = New DirectorySearcher (objEntry, "(cn =" & txtUserName & ")") objSearcher.SearchScope = SearchScope.Base и SearchScope.OneLevel затемнять результат поиска как SearchResult = search.FindOne()