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

VBS LDAP - Fehler beim Auslesen von Mitgliedern aus Gruppen

Frage Entwicklung

Mitglied: DemseinAdmin

DemseinAdmin (Level 1) - Jetzt verbinden

03.11.2009, aktualisiert 16:21 Uhr, 5623 Aufrufe, 4 Kommentare

Hallo zusammen,

ich habe ein Problem bei einem VB Script.
Ich möchte aus allen Gruppen, die ich dem Script per Textdatei liefere, die Mitglieder auslesen.
Hier der Quelltext:
01.
'Quelle festlegen 
02.
RESULTFILE = "result.txt" 
03.
SOURCEFILE = "ou_res.txt" 
04.
OUNIT = "res" 
05.
If FSO.FileExists(SOURCEFILE) Then 
06.
	Set LIST = FSO.OpenTextFile(SOURCEFILE, 1) 
07.
	Set RESULT = FSO.OpenTextFile(RESULTFILE, 2) 
08.
	Do While Not (LIST.AtEndOfStream) 
09.
		GROUP = LIST.ReadLine 
10.
		Set DOMAENE = GetObject("LDAP://...geheim...") 
11.
		ANZ = 0 
12.
		On Error Resume Next 
13.
		ARRMEMBEROF = DOMAENE.GetEx("member") 
14.
		ANZ = UBound(ARRMEMBEROF) + 1 
15.
		On Error GoTo 0 
16.
		If (ANZ >= 1) then 
17.
			RESULT.WriteLine(GROUP & ";" & ANZ) 
18.
		End If 
19.
	Loop 
20.
	Set LIST = Nothing 
21.
End If
SOURCEFILE ist eine Textdatei mit allen Gruppennamen die ich auslesen möchte
RESULTFILE ist eine Textdatei, in welche der Gruppenname + die ANZahl der Mitglieder geschrieben werden soll.

Hierbei werden auch Gruppen ausgegeben, welche leer sind. Ist ja auch ganz klar, weil ich ihm in der Zeile
01.
ANZ = UBound(ARRMEMBEROF) + 1
sage, dass die ANZahl immer >= 1 ist.
Wie bekomme ich es nun hin, dass mir nur die Gruppen ausgegeben werden, die auch wirklich Mitglieder haben? Oder besser: Bei allen leeren Gruppen steht auch tatsächlich eine "0" dahinter?

Danke euch.

Gruß
Simon
Mitglied: 76109
03.11.2009 um 20:59 Uhr
Hallo DemseinAdmin!

Möglicherweise würde es helfen, wenn Du nach:
01.
ARRMEMBEROF = DOMAENE.GetEx("member") 
den Test:
01.
 If Err.Number = 0 Then ANZ  = UBound(ARRMEMBEROF) + 1 
einfügst. Der Err-Test muss selbstverständlich vor der Anweisung <On Error Goto 0> stehen.
Das Array ARRMEMBEROF bleibt bei einem Fehler unverändert bzw. enthält den Wert vom vorherigen Durchlauf.

Gruß Dieter
Bitte warten ..
Mitglied: DemseinAdmin
04.11.2009 um 09:49 Uhr
Hallo Dieter,

vielen Dank dafür, funktioniert!

Jetzt habe ich noch ein weiteres Problem, bei dem mir nicht so wirklich eine passende Lösung in den Kopf schießt:
Nun kann es ja sein, dass die Gruppen aus denen ich die Benutzer auslese, weitere Untergruppen haben, in welcher die eigentlichen Benutzer stecken. Die werden aber bisher nicht mit ausgelesen, da ich ja nur in der ersten Ebene suche.
Hat da jemand spontan eine gute Idee, wie ich das am besten handhaben kann?

Gruß
Simon
Bitte warten ..
Mitglied: 76109
04.11.2009 um 10:33 Uhr
Hallo Simon!

Freut mich, wenn ich Dir zumindest teilweise helfen konnte. Dein anderes Problem entzieht sich leider meiner Kenntnis

Gruß Dieter
Bitte warten ..
Mitglied: DemseinAdmin
05.11.2009 um 11:00 Uhr
Kein Problem!

Dann setze ich das Thema mal auf gelöst und tüftel mal weiter. Wenn noch jemandem was einfällt, bitte nicht scheuen hier zu antworten.

Gruß
Simon
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Mitglieder aus mehreren AD Gruppen mit PowerShell auslesen
gelöst Frage von Stefan007Batch & Shell2 Kommentare

Hallo Leute, ich möchte gerne mit PowerShell eine Übersicht bekommen, welche Mitglieder in den speziellen Gruppen vorhanden sind. Beispiel: ...

Entwicklung
OTRS LDAP Gruppen Sync
gelöst Frage von ChontaEntwicklung3 Kommentare

Hallo zusammen, miene OTRS Fragen nehmen kein ende. Die Frage steht auch schon im OTRS Forum aber hier habe ...

Windows Server
LDAP Authentifizierungsproblem bei Gruppen eines AD
gelöst Frage von Monto1Windows Server17 Kommentare

Hallo zusammen, ich lerne mich gerade in LDAP ein, als Test möchte ich den Dokumentenscanner (Der die Benutzer über ...

Windows Userverwaltung
Administrator ist Mitglied der Gruppe Domänen-Benutzer?
Frage von maxpointWindows Userverwaltung12 Kommentare

Hallo Ich bin gerade auf den Umstand gestoßen, dass der Administrator Mitglied der Sicherheitsgruppe Domänen-Benutzer ist. Das Problem, ich ...

Neue Wissensbeiträge
Mac OS X

MacOS wo ist die Tilde ?

Tipp von Alchimedes vor 8 StundenMac OS X1 Kommentar

Hallo, ich hab eine MacOS qwertz Keyboard auf US Layout umgestellt da die Sonderzeichen besser erreichbar sind. Leider fehlt ...

Datenschutz

Weitere Informationen zum Sicherheitsproblem BeA

Information von Penny.Cilin vor 15 StundenDatenschutz

Im folgenden ein weiterer Bericht über die Sicherheitsprobleme von Bea. Fataler Konstruktionsfehler im besonderen elektronischen Anwaltspostfach Gruss Penny

Windows 10

Systemdienste behalten nach Win10 inplace-Upgrade nicht die ggf. modifizierte Startart bei

Tipp von DerWoWusste vor 16 StundenWindows 103 Kommentare

Stellt Euch vor, Ihr habt ein Win10 System und modifiziert dort die Startart von Systemdiensten. Zum Beispiel wollt Ihr ...

Microsoft Office

Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei

Anleitung von SarekHL vor 19 StundenMicrosoft Office17 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

Batch & Shell
AD-Abfrage in Batchdatei und Ergebnis als Variable verarbeiten
gelöst Frage von Winfried-HHBatch & Shell19 Kommentare

Hallo in die Runde! Ich habe eine Ergänzungsfrage zu einem alten Thread von mir. Ausgangslage ist die Batchdatei, die ...

Windows 10
Netbook erkennt Soundkarte nicht - keinerlei Info zum Hersteller und Modell vom Netbook und Hardware bekannt
Frage von fyrb38Windows 1018 Kommentare

Guten Tag, meine Schwester reist in einigen Wochen für ein paar Monate ins Ausland und hat sich dafür ein ...

Microsoft Office
Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei
Anleitung von SarekHLMicrosoft Office17 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...