28.03.2019 Aufrufe

Hahner_Microsoft-Word-2010---Das-Ideenbuch_ISBN_9783866457980

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

Kapitel 7<br />

Technikwissen für Profis: Vorlagen erstellen, verteilen und automatisieren<br />

der Form frmAlleBenutzerAusADauslesen anzuzeigen. Die Daten lassen sich selbstverständlich<br />

auch in einem Array oder einer Struktur ablegen, um sie so weiterzubearbeiten.<br />

Abbildung 7.12 Im Listenfeld der Beispielanwendung werden alle Benutzer aus dem AD aufgeführt<br />

Besonders zu beachten ist der Search-String, der in der Zeile adoCommand.CommandText<br />

der Datenbankabfrage übergeben wird. Die dortige LDAP-Anweisung definiert, welche<br />

Datenfelder aus dem AD ausgelesen werden. Im Beispiel sind dies sn (= Nachname),<br />

givenName (= Vorname), streetAddress (= Straße), postalCode (= PLZ) und l (= kleines<br />

L, Ort). Die Datenfelder, die Sie anschließend mit dem Kommando adoRecordset.<br />

Fields("").Value abrufen, sind durch ein Komma getrennt aufgeführt. Die<br />

Reihenfolge ist dabei nicht von Bedeutung. Die Schreibweise der Feldbezeichnungen<br />

müssen Sie akribisch einhalten, bereits ein einfacher Buchstabendreher sorgt für Endlosschleifen,<br />

die Sie nur mit der Tastenkombination (Strg)+(Pause/Untbr.) abbrechen<br />

können.<br />

Eine Übersicht aller im AD verfügbaren Datenfelder des User-Objekts erhalten Sie auf der sehr umfangreichen<br />

deutschsprachigen Internetseite http://www.selfadsi.de mit einem Klick auf den Link Attribute für<br />

Active Directory User. Auf der Internetseite finden Sie auch zahlreiche VB-Script-Beispiele, die sich leicht in<br />

VBA-Routinen umwandeln lassen.<br />

Die hier beschriebenen Lösungen zum Auslesen des Active Directory finden Sie in der Datei VBA_Active-<br />

Directory-auslesen.docm im Ordner Kapitel07.<br />

214

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!