vbs实现的可以查询windows系统用户名sid的代码，有需要的朋友可以参考下。
有关sid，可以参考下这篇文章：什么是系统用户sid？
下面是完整代码。
set path=wscript.createobject("wscript.shell")
usera=path.ExpandEnvironmentStrings("%username%")
name=inputbox("请输入要查询的用户名","sid查询---脚本学堂2013",usera)
strComputer = "."
Set wbemServices = Getobject("winmgmts:" & strComputer)
Set wbemObjectSet=wbemServices.execquery("select sid from win32_userAccount where name='"&name&"'")
For Each mo In wbemObjectSet
sSID = mo.sid
Next
If(sSID = "")Then
WScript.Echo "对不起，没有找到这个用户"
Else
WScript.Echo sSID
End If