我一直在試圖查詢LDAP目錄服務器以檢索tnsnames條目。我有以下代碼工作,但它沒有正確的味道。是不是因爲它是錯誤的,或者是因爲查詢LDAP需要間接的幾級如何從LDAP目錄中提取TNSNames
let identifier = LdapDirectoryIdentifier(server, port)
use connection = new LdapConnection (identifier)
connection.AuthType <- AuthType.Anonymous
let request = System.DirectoryServices.Protocols.SearchRequest(defaultAdminContext, "cn=" + sid, SearchScope.OneLevel, "orclnetdescstring")
let response = connection.SendRequest request :?> SearchResponse
Seq.init response.Entries.Count (fun i -> response.Entries.[i])
|> Seq.collect (fun entry ->
let value = entry.Attributes.["orclnetdescstring"]
Seq.init value.Count (fun i -> value.[i])
|> Seq.map (fun v -> Some (v :?> string))
)
我希望的是簡單的通話,基本上是「查詢目錄,並返回結果」,但似乎有一個很多'東西'我必須這樣做才能讀取真正的價值。
你可以用你的語言,操作系統和directoy重新使用你的問題嗎? – JPBlanc 2011-05-13 10:55:00
我已經添加了.net標記,但我不知道正在使用的目錄。我需要知道嗎?我認爲LDAP是一個標準 – 2011-05-13 13:13:38