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

eMail-Adresse (Attribut otherMailbox) per LDAP auslesen (VBS)

Frage Microsoft Exchange Server

Mitglied: datazero

datazero (Level 1) - Jetzt verbinden

15.03.2007, aktualisiert 19.03.2007, 12331 Aufrufe, 9 Kommentare

Alle eMail-Adressen mit Hilfe eines VBS-Skript per LDAP aus einem Exchange 5.5 auslesen

Hallo,

ich habe vor alle Email-Adressen per LDAP aus einem Exchange 5.5 auszulesen und diese per Filter auszuwerten.
Ziel ist für bestimmte Aliase weitere Email-adressen zu erstellen.

Nun mein Problem:
Einem Objekt (Benutzer usw.) sind unterschiedlich viele Email-adressen (Attribut othermailBox) zugeordnet.

Wie kann ich diese per LDAP mit Hilfe eines VBScript auslesen?

Das klappt:
Set ou = GetObject("LDAP:/server/cn=,ou=,o=")
For Each obj In ou
wscript.echo obj.name
Next
Zeigt mir dann auch alle Objekte (Benutzer usw.) an.

Aber wie kann ich dann alle Attribute "otherMailbox" je Objekt ausgeben?
(Das Attribut otherMailbox kann mehrfach pro Objekt vorkommen)

Hilfe bin am verzweifeln....
Mitglied: bastla
15.03.2007 um 12:41 Uhr
Hallo datazero und willkommen im Forum!

Vielleicht hilft Dir das ...

Grüße
bastla
Bitte warten ..
Mitglied: datazero
15.03.2007 um 16:27 Uhr
Hi,

super, danke für den Link, er hat mir weitergeholfen.
Der Codeschnipsel dort geht zwar nicht, habe ihn mir aber umgebaut.

Nun hab ich noch das Problem dass das gute Stück abbricht sobald das gesuchte Attribut eines Objektes nicht existiert.

Wie kann ich dies denn prüfen? Beim Aufruf von obj.exists("otherMailbox") kommt die Fehlermeldung "Objekt unterstützzt die Methode obj.exists nicht" zurück.

Bin dankbar für jeden Tip.
Bitte warten ..
Mitglied: bastla
15.03.2007 um 18:54 Uhr
Hallo datazero!

Üblicherweise sollte das (auf Basis des angesprochenen Schnipsels) etwa so gehen:
01.
objMailbox.GetInfoEx Array("otherMailbox"), 0 
02.
varAddrs = objMailbox.GetEx("otherMailbox") 
03.
If Not IsNull(varAddrs) Then ...
Grüße
bastla
Bitte warten ..
Mitglied: datazero
15.03.2007 um 23:44 Uhr
nochmal Hi,

danke für deine Antwort. Genau das habe ich gesucht. Werde ich gleich morgen früh mal testen.

Mir geht es darum dass jeder User mit einer Emailadresse username@domain.de auch eine Emailadresse username@domain.com bekommt. Eshandelt sich dabei um ein paar hundert User. Da wäre man tagelang beschäftigt das von Hand zu machen. Außerdem würde man wohl einige übersehen oder vergessen.

Nochmal danke für deine Hilfe.
Bitte warten ..
Mitglied: datazero
16.03.2007 um 08:44 Uhr
Hallo,

habe eben mal If not IsNull(varAddrs) Then... probiert.
Gleicher Fehler wie vorher.
Bei einem Objekt ohne otherMailbox kommt ein Fehler und es bricht ab.
Wie kann man denn diese Prüfung sonst noch machen?
Bin um jeden Tip dankbar.
Bitte warten ..
Mitglied: bastla
16.03.2007 um 09:48 Uhr
Hallo datazero!

Bevor wir gleich zu einem "On Error" greifen:
Stell bitte einmal den aktuellen Stand Deines Scripts herein und gib genau an, in welcher Zeile Du welchen Fehler erhältst.

Grüße
bastla
Bitte warten ..
Mitglied: datazero
16.03.2007 um 10:28 Uhr
Hallo,

ich denke es liegt daran das sich nichts prüfen kann was nicht da ist.
Man kann nichts auf IsNull prüfen wenn es dies nicht gibt.

01.
Dim varAddrs 
02.
Set ou = GetObject("LDAP://server/cn=...,ou=...,o=...") 
03.
for each obj in ou 
04.
		obj.GetInfoEx Array("otherMailbox"), 0 
05.
		varAddrs = obj.GetEx("otherMailbox") 
06.
		For i = LBound(varAddrs) To UBound(varAddrs) 
07.
			ENAME = Split(varAddrs(i), "@") 
08.
			wscript.echo varAddrs(i) & vbcr & ENAME(0) & "@domain.com" 
09.
			' Anweisung die neue Adresse erstellt 
10.
		Next 
11.
Next
Der Code läuft solange gut, bis er auf ein Objekt stößt in dem es kein otherMailbox gibt.
Bitte warten ..
Mitglied: bastla
16.03.2007 um 12:23 Uhr
Hallo datazero!

Bitte nochmals genau: Bei welcher Zeile welche Fehlermeldung / -nummer?

Grüße
bastla
Bitte warten ..
Mitglied: datazero
19.03.2007 um 14:10 Uhr
Hallo bastla,

hab es nun hinbekommen. Es war nur eine Typenunverträglichkeit.
Vielen Dank für deine Hilfe und Tips.
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(2)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

Exchange Server
Exchange 2013 - Primäre eMail Adresse ändern (7)

Frage von staybb zum Thema Exchange Server ...

Windows Server
gelöst Wie füge ich diesem Script die Email Adresse hinzu (16)

Frage von rainergugus zum Thema Windows Server ...

Exchange Server
gelöst SBS 2011 - anlegen einer email adresse auf exchange (12)

Frage von jensgebken zum Thema Exchange Server ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...