如何获得windows2000 server的本地用户和组名字(vb)

Question

感谢您使用微软产品。在Window 2000机器上，一般可以用ADSI来取得本地用户和组的名字。具体的关于ADSI的文档资料，您可以参考以下网站：
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/netdir/adsi/active_directory_service_interfaces_adsi.asp?frame=true另外，以下有两段简单代码您可以参考：
列组名：
Dim myComputer
Dim group
Set myComputer = GetObject("WinNT://YourComputerName,computer")
myComputer.Filter = Array("group")
For Each group In myComputer
    Debug.Print group.Name
Next列用户名：
Dim myComputer
Dim member
Set myComputer = GetObject("WinNT://YourComputerName,computer")myComputer.Filter = Array("user")
For Each member In myComputer
    Debug.Print member.Name
Next- 微软亚洲技术中心 VB技术支持本贴子仅供CSDN的用户作为参考信息使用。其内容不具备任何法律保障。您需要考虑到并承担使用此信息可能带来的风险。具体事项可参见使用条款 (http://www.csdn.net/microsoft/terms.shtm)。