Select Username

[centralpressure]

So I have 30 computers that I have inherited. I need to run a program as the admin, however the person who set all of these computers up gave different usernames to all 30, but used the same password. The first 6 characters are all the same, but the last few change, basically numerically increasing. Is it possible for me to write a script that determines which user account is the administrator? There will only be one.

Thanks for any suggestions.

P.S. these are all non-networked systems with LAN and wireless disabled, with limited user accounts, save the one administrator.

[CodyBarrett]

if you KNOW the usernames... make a file with the names.... or if its numerically increasing use a For To Loop

[PsaltyDS]

List current users on the local machine:

NET USER

There are fancier ways, but the idea is that it is not hard for even a non-admin to get a list of user accounts on the machine.

[centralpressure]

List current users on the local machine:

NET USER

There are fancier ways, but the idea is that it is not hard for even a non-admin to get a list of user accounts on the machine.

Thanks for the responses. How do you use "NET USER" I can't seem to find it in the help file?

As far as writing a if loop to numberically increase the user, how would I match the user name for the admin?

Again thanks for the input.

[PsaltyDS]

Thanks for the responses. How do you use "NET USER" I can't seem to find it in the help file?

As far as writing a if loop to numberically increase the user, how would I match the user name for the admin?

Again thanks for the input.

It's a shell command, run it from a command line to see the output.

[DW1]

You could also use WMI. Thanks to Autoit Scriptomatic for this one:

#include<array.au3>
$UserArray = Users()
_ArrayDisplay($UserArray)

Func Users()
    $wbemFlagReturnImmediately = 0x10
    $wbemFlagForwardOnly = 0x20
    $colItems = ""
    $strComputer = "localhost"
    $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
    $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount", "WQL", _
            $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
    If IsObj($colItems) Then
        Local $return[1]
        $return[0] = 0
        For $objItem In $colItems
            $return[0] += 1
            ReDim $return[UBound($return) + 1]
            $return[UBound($return) - 1] = $objItem.Name
        Next
        Return $return
    Else
        SetError(1)
        Return 0
    EndIf
EndFunc   ;==>Users