[ASP.NET] Gebruikersinfo uit AD

Pagina: 1
Acties:

  • DJ-B
  • Registratie: September 2001
  • Laatst online: 30-04 07:45
Ik wil gegevens van een gebruiker uit Active Directory halen.
Nu heb ik een stuk code gevonden: http://www.wwwcoder.com/m...site/1694/68/default.aspx

Alleen is het me niet duidelijk hoe deze te implementeren.
Als ik de imports functie direct na <script runat="server"> zet krijg ik deze foutmelding:
BC30465: 'Imports' statements must precede any declarations.

Als ik de imports functie direct achter <%@ Page Language="VB" Debug="True" Explicit="True" %> zet krijg ik de melding: BC30035: Syntax error.

Ik heb het al het een en ander opgezet m.b.t Imports maar krijg er weinig bruikbare info over.
Kan iemand mij meer duidelijkheid verschaffen? :)

  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 30-04 15:47

mulder

ik spuug op het trottoir

codebehind

oogjes open, snaveltjes dicht


  • DJ-B
  • Registratie: September 2001
  • Laatst online: 30-04 07:45
Ik zal eens gaan googelen

  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 30-04 15:47

mulder

ik spuug op het trottoir

gebruik je Visual Studio?

oogjes open, snaveltjes dicht


  • DJ-B
  • Registratie: September 2001
  • Laatst online: 30-04 07:45
Nee, ASP.NET Web Matrix

  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 27-04 18:17

gorgi_19

Kruimeltjes zijn weer op :9

Dan moet je Import gebruiken als ik het me goed herinner; Imports is voor code-behind.

Zie http://msdn.microsoft.com...l/cpconpagedirectives.asp

[ Voor 40% gewijzigd door gorgi_19 op 09-09-2005 15:02 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo


  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 30-04 15:47

mulder

ik spuug op het trottoir

oogjes open, snaveltjes dicht


  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 27-04 18:17

gorgi_19

Kruimeltjes zijn weer op :9

Codebehind is een ramp met web-matrix :) En niet te gebruiken voor een x-aantal hosts, zoals Brinkster. :)

Digitaal onderwijsmateriaal, leermateriaal voor hbo


  • DJ-B
  • Registratie: September 2001
  • Laatst online: 30-04 07:45
Okay, ik heb het nu opgelost door:
<%@ Page Language="VB" Debug="True" Explicit="True" %>
<%@Import Namespace = "System"%>
<%@Import Namespace = "System.Security.Principal"%>
<%@Import Namespace = "System.DirectoryServices"%>
<%@Import Namespace = "System.Web"%>

te gebruiken.

Alleen nu krijg ik de volgende foutecode:
BC30466: Namespace or type 'DirectoryServices' for the Imports 'System.DirectoryServices' cannot be found.

Iemand nog suggesties? :)

  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 27-04 18:17

gorgi_19

Kruimeltjes zijn weer op :9

If that doesn't work, just copy the .dll file to your bin directory of your project and see if that works.
Kijk trouwens ook eens naar de @ Register directive

[ Voor 18% gewijzigd door gorgi_19 op 09-09-2005 15:29 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo


  • MTWZZ
  • Registratie: Mei 2000
  • Laatst online: 13-08-2021

MTWZZ

One life, live it!

Doe eens zoiets:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
<%@ page language="vbscript" debug="true" %>

<%@ import namespace="System" %>
<%@ import namespace="System.DirectoryServices" %>

<script type="text/vbscript" runat="server">
Dim connStr As String = "LDAP://server.domain.local/OU=EenLeukeOU,DC=domain,DC=local"
Dim dirEnt As DirectoryEntry = New DirectoryEntry(connStr,"user@domain.local","password")
Dim searcher As New DirectorySearcher
    Dim results As SearchResultCollection
    Dim result As SearchResult
    Dim propCollect As ResultPropertyCollection
    Dim sorted As ArrayList = New ArrayList

    Try
        searcher.SearchRoot = dirEnt
        searcher.Filter = "(objectClass=group)"
        searcher.PropertiesToLoad.Add("cn")
    
        results = searcher.FindAll()

        For Each result In results
            propCollect = result.Properties
            sorted.Add(propCollect("cn")(0).substring(3))
        Next

        sorted.Sort()

        return sorted
    Catch e As Exception
        'Abort the module'
        Session("mod_abort") = true

        'Only executed when debugging'
        return nothing
    End Try
</script>


En dan even prutsen om het voor jou aan de praat te krijgen :)
Vooral even naar de connection string en de DirectorySearcher (ook in de MSDN docu's) kijken

Vergeet ik nog te melden wat dit doet. Deze code haalt een lijst op van alle groupen binnen de OrganizationalUnit: EenLeukeOU

[ Voor 15% gewijzigd door MTWZZ op 09-09-2005 20:21 . Reden: iets vergeten ]

Nu met Land Rover Series 3 en Defender 90


  • DJ-B
  • Registratie: September 2001
  • Laatst online: 30-04 07:45
Bedankt! Ik ga er maandag mee verder (nu weekend ;) )

Verwijderd

DJ-B schreef op vrijdag 09 september 2005 @ 14:36:
Ik wil gegevens van een gebruiker uit Active Directory halen.
Het is een ramp om deze gegevens boven water te halen, omdat gebruikers op willekeurige plaatsen in de AD kunnen staan en ook zelfs "dubbel".

Dus hoop voor je dat de AD 'simpel' is opgezet.
Pagina: 1