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

E-Mail-Adresse in Feldfunktion Word2003 aus AD

Frage Microsoft Microsoft Office

Mitglied: WRX

WRX (Level 1) - Jetzt verbinden

21.09.2006, aktualisiert 15:12 Uhr, 2841 Aufrufe, 2 Kommentare

Hallo Zusammen,

bin neu hier und habe in der Suche nichts zu meinem Problem gefunden.


Ich muss eine Wordvorlage erstellen. In dieser Vorlage soll eine Feldfunktion automatisch die E-mail Adresse des angemeldeten Users (ActiveDirectory) einfügen.


Benutzername kann ich unter Einfügen/Feld/Feldname/"Username"

Für E-Mail-Adressen finde ich aber nichts!!


mfg WRX
Mitglied: gemini
21.09.2006 um 15:04 Uhr
Hallo WRX,

ich weiss nicht obs dir hilft, das ist ein Fragment, das in einer Word-Vorlage die Userdaten aus dem ActiveDirectory liest und eine ComboBox damit füllt.
In der ComboBox werden dabei nur die Usernamen angezeigt, nach Auswahl werden die restlichen Daten in das Dokument übernommen.
Ist wie gesagt nur ein Ausschnitt und das Template ist auch noch nicht produktiv.

Private Sub FillComboBox()
strOU = "OU=<OU>"
strGrp = "cn=<Gruppe>"
strDom = "dc=<Domäne>,dc=<TLD>"
Set objGroup = GetObject("LDAP://" & strGrp & "," & strOU & "," & strDom & "")
objGroup.GetInfo
arrMemberOf = objGroup.GetEx("member")

i = 1
For Each strMember In arrMemberOf
Set objUser = GetObject("LDAP://" & strMember & "")
objUser.GetInfo
'MsgBox strMember
On Error Resume Next
arrMembers(i, 0) = objUser.Get("displayName")
arrMembers(i, 1) = objUser.Get("telephoneNumber")
arrMembers(i, 2) = objUser.Get("facsimileTelephoneNumber")
arrMembers(i, 3) = objUser.Get("mobile")
arrMembers(i, 4) = objUser.Get("mail")

cbo.AddItem arrMembers(i, 0) 'Usernames
On Error GoTo 0
i = i + 1
Next

HTH
gemini
Bitte warten ..
Mitglied: WRX
21.09.2006 um 15:12 Uhr
Hmmm Vielen Dank gemini ... nur wenn ich ehrlich bin hab ich vom scripten null plan ...
Bitte warten ..
Ähnliche Inhalte
Exchange Server
Microsoft Exchange Weiterleitung mit anderer primären E-Mail Adresse (14)

Frage von Rene12345 zum Thema Exchange Server ...

Windows 10
E-Mail-Adresse bzw. Konto bei Windows 10 ändern (7)

Frage von Schwedenbitter zum Thema Windows 10 ...

Exchange Server
gelöst Exchange 2016 spezifische externe adresse erhält keine Mail (6)

Frage von theoberlin zum Thema Exchange Server ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(38)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Festplatten, SSD, Raid
POS Hardware und alternativen zu Raid 1? (21)

Frage von Brotkasten zum Thema Festplatten, SSD, Raid ...

Viren und Trojaner
Verschlüsselungstrojaner simulieren (18)

Frage von AlbertMinrich zum Thema Viren und Trojaner ...

Ubuntu
Nextcloud 12 Antivirus App for Files (8)

Frage von horstvogel zum Thema Ubuntu ...

Server-Hardware
gelöst Empfehlung KVM over IP Switch (8)

Frage von Androxin zum Thema Server-Hardware ...