[已解决]求枚举XP中所有的用户名

zch11230

需要获取当前系统中所有的用户名，然后进行相应的操作，net user 的回显又和系统的语言有关系可能会不同，WMI不会啊，搜索了有人问过，但没给出代码，所以我就发贴做伸手党了，各位一定帮忙帮忙。


回了次家 更新慢了点 感谢热心提供源码。

lpxx

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"
$Output = ""
$objWMIService = ObjGet("winmgmts:\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount", "WQL", _
                $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) Then
        For $objItem In $colItems
                $Output = $Output & $objItem.Caption 
                If MsgBox(1, "", $Output) = 2 Then ExitLoop
                $Output = ""
        Next
Else
        MsgBox(0, "", "NO")
EndIf