Jump to content

Recommended Posts

Posted
#include <AutoItConstants.au3>
#include<array.au3>
#RequireAdmin

local $aFinal[0]
$sReturn = ""
$sComp = @ComputerName

$PsCommand = '"' & "([ADSI]'WinNT://" & $sComp & ",computer').psbase.children | where { $_.psbase.schemaClassName -eq 'group' } | foreach { ($_.name)[0]}" & '"'

$iPID = run("powershell " & $PsCommand, "" , @SW_HIDE , $stdout_child)

$sOutput = ""

 While 1
        $sOutput &= StdoutRead($iPID)
        If @error Then
            ExitLoop
        EndIf
 WEnd


$aSelectedGroups = stringsplit(stringtrimright($sOutput , 1) , @LF , 2)


For $i = 0 to ubound($aSelectedGroups) - 1

    $PsCommand = '"' & "$([ADSI]'WinNT://" & $sComp & "/" & stringstripws($aSelectedGroups[$i] , 3) &",group').psbase.Invoke('Members') | foreach { $_.GetType().InvokeMember('ADspath', 'GetProperty', $null, $_, $null).Replace('WinNT://', '') }" & '"'

    $iPID = run("powershell " & $PsCommand, "" , @SW_HIDE , $stdout_child)

    $sOutput = ""

     While 1
            $sOutput &= StdoutRead($iPID)
            If @error Then
                ExitLoop
            EndIf
     WEnd

If $sOutput = "" Then $sOutput = "No members" & @LF
$sReturn &= "*" & $aSelectedGroups[$i] & @LF & $sOutput & @LF

Next

$aFinal = stringsplit($sReturn , @LF , 2)
_ArrayDisplay($aFinal)

 

There are many ways to enum these values, I have a good feeling about this one.

ADSI commands found here:

https://gist.github.com/HarmJ0y/fd98c4f16575ba28c091

,-. .--. ________ .-. .-. ,---. ,-. .-. .-. .-.
|(| / /\ \ |\ /| |__ __||| | | || .-' | |/ / \ \_/ )/
(_) / /__\ \ |(\ / | )| | | `-' | | `-. | | / __ \ (_)
| | | __ | (_)\/ | (_) | | .-. | | .-' | | \ |__| ) (
| | | | |)| | \ / | | | | | |)| | `--. | |) \ | |
`-' |_| (_) | |\/| | `-' /( (_)/( __.' |((_)-' /(_|
'-' '-' (__) (__) (_) (__)

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...