hente oplysninger fra active directory til word

Hvilke informationer ønsker du at hente over til word?

VH CK

brugernavn
stilling


blandt andet........

Ok...

Dette her kan hente titlen på en person i AD.

Sub test()
    MsgBox getProperty("LDAP://CN=Christian Kjær;OU=Administratorer;OU=Intranet Users;DC=intranet;DC=kde", "title")
End Sub

Public Function getProperty(LDAPPath As String, property As String) As String
    Dim ad
    Set ad = GetObject(LDAPPath)
    ad.GetInfo
    getProperty = ad.get(property)
    Set ad = Nothing
End Function


Men vær opmærksom på at give den rigtige LDAP sti til ad'et.

VH CK

det var mere så det feks var muligt for en bruger at vælge en skabelon i word eksempeltvis "følgebrev" som hentede personens titel og navn osv ind i dokumnetet når skabelonen blev valgt.

Brugernavn kan du hente direkte i Word ved at indsætte et felt.

VH CK

hvordan gør man det??

Gå i menuen indsæt - felt. På listen til venstre vælger du brugernavn, og på listen til højre vælger du om det skal være med store bogstaver eller små eller...

VH CK

Men det er jo ikke særlig smart for en administrator hvis han skal ind på alle maskiner og sætte dette.

Det skal han jo heller ikke, det er et felt admin sætter i word dokumentet og gemmer det som en skabelon. Den skabelon bruger alle folk så til deres breve eller hvad det nu er skabelonen er til.

VH CK