Hi, da steht meine korrekte Domain drin, in einer Konsolenanwendung funktioniert der Quellcode auch.
Ciao Steven -----Urspr�ngliche Nachricht----- Von: Christoph Wille [mailto:[EMAIL PROTECTED]] Gesendet: Dienstag, 21. Januar 2003 17:49 An: [EMAIL PROTECTED] Betreff: Re: AW: [Vb.net] Active Directory abfrage System.DirectoryServices.DirectoryEntry("LDAP://DC=MusterDomain ,DC=com", "ADMINUSER", "ADMINPASSWORT") DC=MusterDomain ---> da steht aber schon Deine existierende Domain drinnen, richtig? Chris At 05:37 PM 1/21/2003 +0100, you wrote: >Hallo Chris, > >vielen Dank f�r den Tip mit der Authentication, ich habs gleich >ausprobiert, doch leider funktionierts trotzdem nicht, es scheint so, dass >man vom IIS-System kein Zugriff auf das Active Directory erh�lt. Als >Meldung erh�lt man: Die angegebene Dom�ne ist nicht vorhanden oder es >konnte keine Verbindung hergestellt werden > >Vollst�ndiger Fehlertext: > >Die angegebene Dom�ne ist nicht vorhanden oder es konnte keine Verbindung >hergestellt werden > >Beschreibung: Beim Ausf�hren der aktuellen Webanforderung ist ein >unverarbeiteter Fehler aufgetreten. �berpr�fen Sie die Stapel�berwachung, >um weitere Informationen �ber diesen Fehler anzuzeigen und festzustellen, >wo der Fehler im Code verursacht wurde. > >Ausnahmedetails: System.Runtime.InteropServices.COMException: Die >angegebene Dom�ne ist nicht vorhanden oder es konnte keine Verbindung >hergestellt werden > >Quellfehler: >Zeile 29: searcher.PropertiesToLoad.Add("mail") >Zeile 30: searcher.SearchScope = DirectoryServices.SearchScope.Subtree >Zeile 31: results = searcher.FindAll() >Zeile 32: For Each result In results >Zeile 33: Response.Write(result.Properties("Mail").Item(0)) > > Quelldatei: > c:\inetpub\wwwroot\ActiveDirectory\WebForm1.aspx.vb Zeile: 32 >Stapel�berwachung: >[COMException (0x8007054b): Die angegebene Dom�ne ist nicht vorhanden oder >es konnte keine Verbindung hergestellt werden] > System.DirectoryServices.DirectoryEntry.Bind(Boolean throwIfFail) > System.DirectoryServices.DirectoryEntry.Bind() > System.DirectoryServices.DirectoryEntry.get_AdsObject() > System.DirectoryServices.DirectorySearcher.FindAll(Boolean > findMoreThanOne) > System.DirectoryServices.DirectorySearcher.FindAll() > ActiveDirectory.WebForm1.Page_Load(Object sender, EventArgs e) in > c:\inetpub\wwwroot\ActiveDirectory\WebForm1.aspx.vb:32 > System.Web.UI.Control.OnLoad(EventArgs e) > System.Web.UI.Control.LoadRecursive() > System.Web.UI.Page.ProcessRequestMain() > > >-----Urspr�ngliche Nachricht----- >Von: Christoph Wille [mailto:[EMAIL PROTECTED]] >Gesendet: Dienstag, 21. Januar 2003 16:50 >An: [EMAIL PROTECTED] >Betreff: Re: [Vb.net] Active Directory abfrage > > >Mit welchen Fehler scheitert das ganze? > >Au�erdem w�rde ich MusterDomain\Adminuser verwenden (Punkt 1), und zwar >�berall auf allen Objekten die Authentication unterst�tzen, weil sonst >funktioniert das in ASP.NET sicher nicht (wg. dem Defaultaccount unter dem >der Worker Process l�uft) > >Chris > >At 04:43 PM 1/21/2003 +0100, you wrote: > >Zur Zeit versuche ich das Active Directory mit der > >System.Directoryservices Bibliothek auszulesen. In einer Konsolenanwendung > >funktioniert dies ohne Probleme, aber wenn ich den Code im Loadereignis > >einer Webform einf�ge, scheitert die Abfrage an der Funktion Findall der > >Directorysearcher Klasse (rot gekennzeichnet). Kann mir jemand sagen, wie > >man das Active Directory in einer ASP.Net Anwendung mittels VB.Net > >abfragen kann? Oder kennt jemand eine interessante Inetsite oder ein Buch > >zu diesem Thema? > > > >Mein Quellcode: > > > >Dim sUserlogin As String > >Dim sEmail as string > >Dim result As System.DirectoryServices.SearchResult > >Dim results As System.DirectoryServices.SearchResultCollection > >Dim searcher As New System.DirectoryServices.DirectorySearcher(root) > >Dim root As New > >System.DirectoryServices.DirectoryEntry("LDAP://DC=MusterDomain ,DC=com", > >"ADMINUSER", "ADMINPASSWORT") > >sUserlogin = "mmustermann" > >searcher.Filter = "sAMAccountName=" & sUserlogin.ToString > >searcher.SearchScope = DirectoryServices.SearchScope.Subtree > >searcher.PropertiesToLoad.Add("mail") > >results = searcher.FindAll() > >For Each result In results > >sEmail = result.Properties("Mail").Item(0) > >Next result > > > >Vielen Dank > >Steven _______________________________________________ Vb.net mailing list [EMAIL PROTECTED] http://www.glengamoi.com/mailman/listinfo/vb.net _______________________________________________ Vb.net mailing list [EMAIL PROTECTED] http://www.glengamoi.com/mailman/listinfo/vb.net
