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

Ldap-Abfrage via VBS-Script liefert einen falschen Wert

Frage Entwicklung VB for Applications

Mitglied: kaffebone

kaffebone (Level 1) - Jetzt verbinden

14.06.2010 um 09:42 Uhr, 4424 Aufrufe

ich stehe vor einem Burnout mit dem Problem!

Hallo zusammen!

ich habe es hingekriegt die richtigen Werte aus Ldap auszulesen. Das funktioniert aber nicht immer.
Wir haben in der Firma einen Benutzer Herrn Mustermann, der gleich zwei UID's hat und an der Stelle stolpert mein Script.
Alle Benutzer, die vor Herrn Mustermann vorkommen, bekommen richtige Werte zurück. Alle die nach Herrn Mustermann vorkommen, vererben die Telefonnummer von Hr. Mustermann.

Erkennt jemand einen Fehler im Script? Ist es ein Fehler des Skriptes oder ist es strick unzulässig zwei UID's bei einem Benutzer zu haben?
Zum Script: UID in Ldap = %username%


01.
 
02.
set WshShell = WScript.CreateObject("WScript.Shell")  
03.
UserName = WshShell.ExpandEnvironmentStrings("%username%") 
04.
UserName = UCase(UserName)  
05.
 
06.
'----------------------------------------------------------------- 
07.
'Zugangsdaten zum Ldap:  
08.
ldapName = "ldapserver" 
09.
ldapPass = "ldappwd" 
10.
ldapServer = "bar.foo.org:389/ou=ouwert,o=owert" 
11.
'----------------------------------------------------------------- 
12.
sRoot = "LDAP://" & ldapServer 
13.
Set dso = GetObject("LDAP:") 
14.
Set objRS = CreateObject("adodb.recordset") 
15.
 
16.
On Error Resume Next 
17.
Set xResult = dso.OpenDSObject(sRoot, ldapName, ldapPass, ADS_SECURE_AUTHENTICATION) 
18.
 
19.
For Each obj In xResult 
20.
	 if obj.uid = UserName then	 
21.
		strTel = obj.telephonenumber 
22.
       		WScript.Echo "UserName:" & UserName & vbCrLF & "Tel:" & strTel  & vbCrLF & "name:" & " " & obj.name 
23.
Exit For 
24.
 
25.
	end if 
26.
Next 
27.
 
28.
Set WshShell = Nothing 
29.
Set objServer = Nothing 
30.
 

Danke für jeden Tipp!!!
Ähnliche Inhalte
VB for Applications
VBS Script zum versenden mehrerer Verknüpfungen zu Dateien per Lotus Notes

Frage von Sentinel87 zum Thema VB for Applications ...

Batch & Shell
gelöst VBS Script in eine Textdatei ausgeben (VBS mit Batch zusammenführen) (5)

Frage von Luuke257 zum Thema Batch & Shell ...

VB for Applications
gelöst Abfrage, ob Datei mit Variablem Wert existiert (12)

Frage von Anrion zum Thema VB for Applications ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(2)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Server
gelöst Wie erkennen, dass nur deutsche IPs Zugang zu einer Website haben? (22)

Frage von Coreknabe zum Thema Server ...

LAN, WAN, Wireless
gelöst Statische Routen mit ISC-DHCP Server für Android Devices (22)

Frage von terminator zum Thema LAN, WAN, Wireless ...

Exchange Server
gelöst Migration Exchange 2007 zu 2013 - Public Folder teilweise weg (16)

Frage von Andy1987 zum Thema Exchange Server ...