Get user list in Win XP / Vista

[oviradoi]

Hello.

Does anyone know how to get a list of users in Windows XP / Vista using AutoIT?

I need a list of the user accounts created in Windows.

[smashly]

Hi, not sure if it works in vista, but it works ok in xp.

#include <array.au3> ; Not needed by _ListUsers()

$LU = _ListUsers()
If Not @error Then _ArrayDisplay($LU, "List Users")

Func _ListUsers()
    Local $colUsers, $sTmp, $Array[1] = ["user"]
    $colUsers = ObjGet("WinNT://" & @ComputerName)
    If Not IsObj($colUsers) Then Return SetError(1, 0, 0)
    $colUsers.Filter = $Array
    For $objUser In $colUsers
        $sTmp &= $objUser.Name & "|"
    Next
    Return SetError(0, 0, StringSplit(StringTrimRight($sTmp, 1), "|"))  
EndFunc

Cheers

Edit: corrected function name.

Edited July 17, 2008 by smashly

[oviradoi]

Thanks!

You guys are great! muttley