Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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

VBScript - Mitglieder einer Gruppe auflisten

Frage Entwicklung VB for Applications

Mitglied: noreux

noreux (Level 1) - Jetzt verbinden

04.10.2007, aktualisiert 17:56 Uhr, 11023 Aufrufe, 1 Kommentar

Hallo,

Ich möchte mittels VBScript prüfen ob in einer bestimmten Gruppe Mitglieder sind. Mit folgendem Code zeigt er mir auch die Mitglieder an:

01.
... 
02.
 
03.
    Set Membergroup = GetObject("LDAP://CODE1/CN-USERS,OU=Groups,...") 
04.
    membergroup.GetInfo  
05.
 
06.
    arrMemberOf = Membergroup.GetEx("member") 
07.
 
08.
    For Each strMember in arrMemberOf 
09.
    WScript.echo strMember 
10.
 
11.
    Next 
12.
 


Sollte in der Gruppe aber kein User sein, krieg ich eine Fehlermeldung zurück. Kann ich das irgendwie umgehen, indem ich nachfrage ob denn überhaupt User in der Group sind, bevor ich sie dem Array hinzufüge?
Bin für jeden Ratschlag offen!
Gruß
Nor
Mitglied: bastla
04.10.2007 um 17:56 Uhr
Hallo noreux und willkommen im Forum!

Eine (billige) Lösung könnte so aussehen:
01.
... 
02.
 
03.
    Set Membergroup = GetObject("LDAP://CODE1/CN-USERS,OU=Groups,...") 
04.
    membergroup.GetInfo 
05.
    Anz = 0 
06.
    On Error Resume Next 
07.
    arrMemberOf = Membergroup.GetEx("member") 
08.
    Anz = UBound(arrMemberOf) + 1 
09.
    On Error Goto 0 
10.
    If Anz > 0 Then 
11.
        For Each strMember in arrMemberOf 
12.
            WScript.echo strMember 
13.
 
14.
        Next 
15.
    End If
Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Mitglieder aus mehreren AD Gruppen mit PowerShell auslesen (2)

Frage von Stefan007 zum Thema Batch & Shell ...

Exchange Server
gelöst Allen Mitgliedern einer Distributionsgruppe das Senden als erlauben (4)

Frage von Cubic83 zum Thema Exchange Server ...

Batch & Shell
gelöst PS alle Mitglieder einer Sicherheitsgruppe bzw. OU (6)

Frage von lupolo zum Thema Batch & Shell ...

Neue Wissensbeiträge
Virtualisierung

Docker Monitoring und Steuerung per "sen"

Tipp von Frank zum Thema Virtualisierung ...

Viren und Trojaner

Neues Botnetz über IoT-Geräte

(6)

Information von certifiedit.net zum Thema Viren und Trojaner ...

Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Heiß diskutierte Inhalte
Windows Installation
Windows 10 neu installieren (17)

Frage von imebro zum Thema Windows Installation ...

Router & Routing
Externe IP von innen erreichbar machen (15)

Frage von Windows10Gegner zum Thema Router & Routing ...

Windows 7
Abbruch bei Brennvorgang (12)

Frage von Simulant zum Thema Windows 7 ...