Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Active Directory (User sowie dessen Gruppen ausgeben)

Frage Microsoft Windows Server

Mitglied: Schneidaa

Schneidaa (Level 1) - Jetzt verbinden

29.06.2010 um 13:29 Uhr, 4167 Aufrufe

Hallo @ all,
ich habe ein Problem, welches sich auf das Auslesen von Usern sowie deren Berechtigungsgruppen bezieht. Ich will, das alle User welche eine bestimmte Kostenstelle besitzen, sammt ihren Berechtigungsgruppen in ein Excel Sheet geschrieben werden. Ich bin nicht sehr eingearbeitet in dem Thema Active Directory und habe auch versucht mich auf den unzähligen Seiten mit der Problematik auseinanderzusetzen.

Was ich bisher habe ist das:

Set con = CreateObject("ADODB.Connection")
con.Provider = "ADsDSOObject"
con.Open "Active Directory Provider"

Set ocommand = CreateObject("ADODB.Command")
ocommand.ActiveConnection = con

ocommand.CommandText = "<GC://" & GetObject("GC://RootDSE").Get("defaultNamingContext") & ">;" & _
"(&(objectCategory=person)(objectClass=user)(extensionattribute2=" & strKostenstelle & "*))" & _
";Displayname,Department,cn,distinguishedName;subTree"
Set rs = ocommand.Execute
iCount = rs.RecordCount
i = 8
Do Until rs.EOF
On Error Resume Next
sName = "": sAbteilung = ""
sName = rs.fields(0)
sAbteilung = rs.fields(1)
sCN = rs.fields(2)
sdistinguishedName = rs.fields(3)
rs.movenext
Cells(i, 1).Value = sName
Cells(i, 2).Value = sAbteilung
Cells(i, 3).Value = sCN
i = i + 1
Loop
rs.Close
End Sub


Was heißt: Ich lese die Kostenstelle mit Hilfe eines Textfeldes ein und stelle die Verbindung zum AD her anschließend werden
Name
Abteilung
Benutzername
in entsprechende Felder eingetragen nur habe ich leider keine Ahnung wie ich jetzt an die jeweiligen Berechtigungsgruppen der jeweiligen Personen komme. Danach sollten die Benutzergruppen gruppiert werden sodass nur der User angezeigt werden soll und auf knopfdruck die jeweiligen Gruppen.
Ich Bitte um Hilfe am besten in Codeform da mir die ganzen Seiten wenig geholfen haben.
Gruppen befinden sich bei mir unter: ldap://btnweuce1/ou=groups,ou=local,ou=btn,ou=de,dc=euce,dc=corp,dc=bshg,dc=com
User unter: ldap://btnweuce1/ou=accounts,ou=local,ou=btn,ou=de,dc=euce,dc=corp,dc=bshg,dc=com
Neuester Wissensbeitrag
Microsoft Office

MS Office Excel - Formel wird angezeigt, aber nicht berechneter Wert!

Tipp von holli.zimmi zum Thema Microsoft Office ...

Ähnliche Inhalte
Heiß diskutierte Inhalte
Hyper-V
gelöst Reiner Hyper- V Server oder lieber Rolle (15)

Frage von Winuser zum Thema Hyper-V ...

Windows Server
gelöst Rechte als Admin vergeben - Zugriff verweigert (14)

Frage von Ghost108 zum Thema Windows Server ...

Router & Routing
gelöst IP Kamera für drei unabhängige Netzwerke (12)

Frage von ProfessorZ zum Thema Router & Routing ...