Top-Themen

Aktuelle Themen (A bis Z)

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
GELÖST

VB aus einem Anmeldename AD Attribute auslesen

Frage Entwicklung VB for Applications

Mitglied: claustrophobia

claustrophobia (Level 1) - Jetzt verbinden

22.05.2012 um 16:07 Uhr, 4283 Aufrufe, 3 Kommentare

ich bin ganz neu hier. Ich versuche gerade ein Skript zu erstellen welches mir aus einem Username verschiedene AD Attribute ausliest.

Mit dem Befehl: "GetObject("LDAP://" & CreateObject("ADSystemInfo").username).telephoneNumber" bekomme ich die Telefonnummer des aktuell angemeldeten Benutzers. Ich möchste aber einen Username übergeben, und die Telefonnummer herausbekommen.

Vielleicht kann mir ja jemand helfen, würde mich sehr freuen
THX!
Mitglied: MrTrebron
22.05.2012 um 16:36 Uhr
Servus,

muss man denn die Anfrage direkt in zwei Foren Posten?

Gruß
Norbert
Bitte warten ..
Mitglied: claustrophobia
22.05.2012, aktualisiert um 16:54 Uhr
war sehr dringend. Ich habe mittlerweile auch eine Lösung dafür.
Hier der Quellcode:

01.
'### Zu Angemeldeten User die Telefonnummer auslesen ### 
02.
 
03.
logonName = Username       'hier den Namen des gewünschen Benutzers einsetzen 
04.
 
05.
Const ADS_NAME_INITTYPE_GC = 3 
06.
Const ADS_NAME_TYPE_NT4 = 3 
07.
Const ADS_NAME_TYPE_1779 = 1 
08.
 
09.
Set nto = CreateObject("NameTranslate")         'Name Translate Objekt initialisieren und Namen umwandeln 
10.
nto.Init ADS_NAME_INITTYPE_GC, "" 
11.
nto.Set ADS_NAME_TYPE_NT4, logonName 
12.
userDN = nto.Get(ADS_NAME_TYPE_1779)            'userDN enthält nun den kompletten LDAP Pfad... 
13.
 
14.
'#WScript.Echo userDN 
15.
 
16.
Set user = GetObject("LDAP://" & userDN)        '...dieser kann zum Zugriff auf das Benutzerobjekt verwendet werden 
17.
WScript.Echo user.telephoneNumber
MfG,

Claus
[Edit Biber] Codeformatierung [/Edit]
Bitte warten ..
Mitglied: kontext
22.05.2012 um 16:54 Uhr
Wenn das Problem gelöst ist dann auch auf erledigt setzen:

http://www.administrator.de/faq/32
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Powershell AD Attribute auslesen
gelöst Frage von xbast1xBatch & Shell8 Kommentare

Hallo zusammen, ich möchte gern von allen AD Usern die E-Mail,Nachname, Vorname auslesen und in eine CSV exportieren. Ich ...

Windows Userverwaltung
Set AD User Attribute
gelöst Frage von joehuabaWindows Userverwaltung2 Kommentare

Hallo Zusammen, ich habe folgendes Problem: Ich kann per PowerShell in die Attribute von AD-Usern schreiben. (z.B. Stadt) Allerdings ...

Exchange Server
Self Service für AD Attribute
gelöst Frage von mart1nExchange Server2 Kommentare

Hallo zusammen, ich habe da mal eine Frage zu den Kontoinformationen die man im OWA ändern kann. In der ...

Batch & Shell
AD-Abfrage Attribute mittels Batch
gelöst Frage von goodbytesBatch & Shell2 Kommentare

Hallo, mittels dsquery.exe kann ich ja Abfragen an das AD senden. Die folgende Abfrage gibt mir die Standorte aller ...

Neue Wissensbeiträge
Windows 10

Windows 10 v1709 EN murkst bei den Regionseinstellungen

Tipp von DerWoWusste vor 3 StundenWindows 10

Dieser kurze Tipp richtet sich an den kleinen Personenkreis, der Win10 v1709 EN-US frisch installiert und dabei die englische ...

Webbrowser

Kein Ton bei Firefox Quantum über RDP

Tipp von Moddry vor 4 StundenWebbrowser

Hallo Kollegen! Hatte das Problem, dass der neue Firefox bei mir auf der Kiste keinen Ton hat, wenn ich ...

Internet

EU-DSGVO: WHOIS soll weniger Informationen liefern

Information von sabines vor 16 StundenInternet4 Kommentare

Wegen der europäische Datenschutzgrundverordnung stehen die Prozesse um die Registrierung von Domains auf dem Prüfstand. Sollte die Forderungen umgesetzt ...

Verschlüsselung & Zertifikate

19 Jahre alter Angriff auf TLS funktioniert immer noch

Information von BassFishFox vor 22 StundenVerschlüsselung & Zertifikate1 Kommentar

Interessant zu lesen. Der Bleichenbacher-Angriff gilt unter Kryptographen als Klassiker, trotzdem funktioniert er oft noch. Wie wir herausgefunden haben, ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
Von rj11 auf rj45
Frage von jensgebkenLAN, WAN, Wireless19 Kommentare

Hallo Gemeinschaft, könnt ihr mir vielleicht bei der anfertigung eines Kabels helfen - habe ein rj 11 stecker und ...

Netzwerkmanagement
NAS über zwei weitere Ethernet Anschlüsse verbinden
gelöst Frage von Sibelius001Netzwerkmanagement17 Kommentare

Sorry - ich bin hier wahrscheinlich als kompetter IT Trottel unterwegs. Aber eventuell kann mir jemand ganz einfach helfen: ...

Netzwerkmanagement
Firefox Profieles im Roaming
gelöst Frage von Hendrik2586Netzwerkmanagement17 Kommentare

Hallo liebe Leute. :) Ich hab da ein kleines Problem, welches anscheinend nicht unbekannt ist. Wir nutzen hier in ...

LAN, WAN, Wireless
Häufig Probleme beim Anmelden in WLAN
Frage von mabue88LAN, WAN, Wireless15 Kommentare

Hallo zusammen, in einem Netzwerk gibt es relativ häufig (1-2 mal pro Woche) Probleme mit der WLAN-Verbindung. Zunächst mal ...