Computer Member of AD Group


This script looks if the Computer running on it is in an specified Active Directory Group: (in this Example: ActiveDirectoryGroup1 or ActiveDirectoryGroup2)

Dim WSHShell, objNET, objSysInfo, objComputer, strComputerDN, strGroups, Group, GroupName
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set objNET = WScript.CreateObject("WScript.Network")
Set objSysInfo = WScript.CreateObject("ADSystemInfo")
strComputerDN = objSysInfo.COMPUTERNAME
Set objComputer = GetObject("LDAP://" & strComputerDN)  
  
strGroups = objComputer.GetEx("memberOf")   
For Each Group in strGroups
Set ThisGroup = GetObject("LDAP://" & Group)
GroupName = ThisGroup.CN

Select Case GroupName
   Case "ActiveDirectoryGroup1"
Wscript.echo "Group1"
WScript.Quit(0) 
   Case "ActiveDirectoryGroup1"
        Wscript.echo "ActiveDirectoryGroup2"
End Select
Next
positive Bewertung({{pro_count}})
Beitrag bewerten:
{{percentage}} % positiv
negative Bewertung({{con_count}})

DANKE für deine Bewertung!


Top-Artikel in diesem Bereich

vbscript string

vbscript string

geändert: 11.10.2016 von Bernhard (Erstveröffentlichung: 06.01.2011)

Strings werden zum Speichern und durch Aufruf von Funktionen zum Manipulieren von Text verwendet. (Ein String ist eine gespeicherte Zeichenfolge) ... weiterlesen

VBScript .vbs Datum und Zeit Funktionen Syntax Referenz

VBScript .vbs Datum und Zeit Funktionen Syntax Referenz

geändert: 31.03.2020 von Bernhard (Erstveröffentlichung: 06.01.2011)

Datum und Zeit Funktionen in vbscript ... weiterlesen

Preview wie erstelle ich eine vbscript Datei .vbs - Grundlagen

wie erstelle ich eine vbscript Datei .vbs - Grundlagen

geändert: 31.03.2020 von Bernhard (Erstveröffentlichung: 04.01.2008)

Zum Erstellen der vbscript Datei genügt ein einfacher Editor. Eine in Windows abgespeicherte Textdatei mit der Eindung .vbs kann direkt ausgeführt werden. ... weiterlesen


Fragen / Kommentare