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

Attribute eines AD-Objektes ermitteln

Frage Entwicklung

Mitglied: bordermax

bordermax (Level 1) - Jetzt verbinden

18.11.2010 um 12:32 Uhr, 2877 Aufrufe, 5 Kommentare

Hi,

wie kan ich die Attribute eines AD-Objektes von dem ich nur weiß daß es existiert (aber nicht wo, bzw. in welcher OU) per vbskript ermitteln ?

gruß

Markus
Mitglied: bastla
18.11.2010 um 13:42 Uhr
Hallo bordermax!

Nix, was die Scripting Guys nicht schon beantwortet hätten ...

Grüße
bastla
Bitte warten ..
Mitglied: Biber
18.11.2010 um 13:53 Uhr
[OT]

Zitat von bordermax:
Hi,

wie kan ich die Attribute eines AD-Objektes von dem ich nur weiß daß es existiert (aber nicht wo, bzw. in welcher OU)
wie kan ich die Händynummer einer potentiellen Praktikantin von der nur weiß daß sie rothaarig ist (aber nicht wo) ermitteln?

Bei manchen Frageformulierungen hier erstaunt es mich, dass trotzdem so schnell und konstruktiv geantwortet wird.

Grüße
Biber
[/OT]
Bitte warten ..
Mitglied: bordermax
18.11.2010 um 15:57 Uhr
hi biber,

danke daß du dich erbarmt hast auf meine laienhafte frage zu anwtorten, wenn auch nicht sehr konstruktiv.
vielleicht wärst du so gnädig mich vielleicht in die gepflogenheiten der korrekten fragestellung in diesem forum einzuführen.

hochachtungsvoll

ein forum dummy
Bitte warten ..
Mitglied: Biber
18.11.2010 um 21:07 Uhr
[OT ii]

mich vielleicht in die gepflogenheiten der korrekten fragestellung in diesem forum einzuführen.
Das haben Kollege bordermax und ich per PN erledigt, damit wir nicht zu weit ins OffTopic abdriften und das Forum nicht langweilen.

[/OT ii]
Bitte warten ..
Mitglied: bordermax
23.11.2010 um 09:56 Uhr
hi,

hab die lösung gefunden ....
zuerst vielleicht nochmal etwas mehr im detail was eigentlich das problem war / ist.

"ich möchte per skript die mitglieder einer beliebigen gruppe auslesen und zu mitglieder einer anderen gruppe machen.
um einer gruppe ein mitglied per skript zuzuordnen muß man ja den kompletten pfad des mitglieds im ad kennen.
wie kann ich jetzt den pfad im ad eines beliebigen mitglieds (egal ob zum beispiel user oder computer) ermitteln ?"

01.
Function distinguish (DistMember) 
02.
   Set objRootDSE = GetObject("LDAP://RootDSE") 
03.
   strDNSDomain = objRootDSE.get("defaultNamingContext")  
04.
   Const ADS_SCOPE_SUBTREE = 2 
05.
   Set objConnection = CreateObject("ADODB.Connection") 
06.
   Set objCommand = CreateObject("ADODB.Command") 
07.
   objConnection.Provider = "ADsDSOObject" 
08.
   objConnection.Open "Active Directory Provider" 
09.
   Set objCommand.ActiveConnection = objConnection 
10.
   objCommand.CommandText = "Select distinguishedname, Name, Location from 'LDAP://" & strDNSDomain & "' Where name='" & DistMember & "'"  
11.
   ' ADO-Verbindung herstellen 
12.
   objCommand.Properties("Page Size") = 1000      
13.
   objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE         
14.
   Set objRecordSet = objCommand.execute      
15.
   objRecordSet.MoveFirst           
16.
   Do Until objRecordSet.EOF         
17.
      DistMember = objRecordSet.Fields("distinguishedname") 
18.
      objRecordSet.MoveNext  
19.
   Loop 
20.
End Function
Gruß

Markus

[Edit Biber] Codeformatierung. [/Edit]
Bitte warten ..
Ähnliche Inhalte
Windows Server
AD Überwachung nach unterschiedlichen Ereignissen (3)

Frage von WinLiCLI zum Thema Windows Server ...

Windows Server
Fehler Vertrauensstellung im AD (17)

Frage von thomas-99 zum Thema Windows Server ...

Samba
Samba AD V 4.3.11-Ubuntu (Frage zu Best-Practice) (6)

Frage von Belephor zum Thema Samba ...

Microsoft
Server 2012 ad auf server 2012 r2 migrieren (10)

Frage von thomasreischer zum Thema Microsoft ...

Neue Wissensbeiträge
Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(4)

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 ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (41)

Frage von Datsspeed zum Thema Exchange Server ...

Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Off Topic
gelöst Fachzeitschriften als E-Book oder hardcoded? (11)

Frage von KowaKowalski zum Thema Off Topic ...

Windows 10
Windows Store Apps ohne Windows Store installieren (10)

Frage von keefien zum Thema Windows 10 ...