[已解决]求枚举XP中所有的用户名
本帖最后由 zch11230 于 2012-7-22 17:12 编辑需要获取当前系统中所有的用户名，然后进行相应的操作，net user 的回显又和系统的语言有关系可能会不同，WMI不会啊，搜索了有人问过，但没给出代码，所以我就发贴做伸手党了，各位一定帮忙帮忙。
回了次家 更新慢了点 感谢热心提供源码。
$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
页:
[1]