如何检索Lotus Notes Domino目录组和用户

本文介绍了如何检索Lotus Notes Domino目录组和用户的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述 使用Studio 2013 VB。 我正在尝试从Lotus Notes Domino目录中检索组成员 - 但我无法通过此错误：A协议错误发生。失败，指定了无效的身份验证方法。我假设（可能不正确）这可以使用DirectorySearcher完成，就像我们为Active Directory一样。 我尝试使用相同的结果检索各种数据。我的研究似乎表明ldapsettings存在问题，但我使用的是其他内部脚本使用的相同别名和特定ldapsettings（尽管用perl编写）。所以ldapsettings仍然可能是问题。 失败的代码行是： Dim result As SearchResult = searcher.FindOne searcher.Filter的值是（&（objectclass = dominoGroup）（cn = groupname）） 我的代码中有错误的任何帮助 - 甚至是完成的建议这个任务更好的方式是值得赞赏的。 这是我的代码： dim grp as String = mydominogroup 使用 dEntry 作为 新 DirectoryEntry（ LDAP：// mycompanyldapsettings） dEntry.Username = myadminaccount dEntry.Password = myadminpassword 使用搜索器 As 新 DirectorySearcher（dEntry） searcher.Filter = String .Format（ （&（objectclass = dominoGroup）（cn = {0}）），grp） Dim 结果作为 SearchResult = searcher.FindOne< - 在这里失败 如果结果 没什么 那么 找不到报告组 Else Dim 成员 As Object = result.GetDirectoryEntry.Invoke（ Members， Nothing ） 如果成员 Nothing 然后 报告在 关键字>对于 每个成员作为 对象 在 CType （成员，IEnumerable） Dim currentMember As 新 DirectoryEntry（成员） 如果 currentMember.SchemaClassName.ToLower = user 然后 Dim props As PropertyCollection = currentMember.Properties 获取并列出用户props.someparm）。值） End if Next End if End If End using End Using 解决方案 决定调用外部进程来处理此问题。解决。 Using Studio 2013 VB.I am attempting to retrieve group members from our Lotus Notes Domino directory - but I cannot get past this error: "A protocol error occurred. Failed, invalid authentication method specified." I was assuming (maybe incorrectly) that this could be done using DirectorySearcher as we do for our Active Directory.I have tried retrieving various data with the same results. My research seems to indicate a problem with the ldapsettings but I am using the same alias and specific ldapsettings used by other in-house scripts (albeit written in perl). So the ldapsettings still might be the problem.The line of code that fails is:Dim result As SearchResult = searcher.FindOneThe value of searcher.Filter is (&(objectclass=dominoGroup)(cn=groupname))Any help with errors in my code - or even suggestions to accomplish this task a better way are appreciated. Here is my code:dim grp as String = "mydominogroup"Using dEntry As New DirectoryEntry("LDAP://mycompanyldapsettings") dEntry.Username = myadminaccount dEntry.Password = myadminpassword Using searcher As New DirectorySearcher(dEntry) searcher.Filter = String.Format("(&(objectclass=dominoGroup)(cn={0}))", grp) Dim result As SearchResult = searcher.FindOne <--fails here If result Is Nothing Then "report group not found" Else Dim members As Object = result.GetDirectoryEntry.Invoke("Members", Nothing) If members Is Nothing Then "report no members found in group" Else For Each member As Object In CType(members, IEnumerable) Dim currentMember As New DirectoryEntry(member) If currentMember.SchemaClassName.ToLower = "user" Then Dim props As PropertyCollection = currentMember.Properties "get and list the user props.someparm").Value)" End If Next End If End If End Using End Using 解决方案 Decided to call an external process to handle this. Solved. 这篇关于如何检索Lotus Notes Domino目录组和用户的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！