Wscript.Echo "Servers :"
Dim Server, A, I
Set Server = CreateObject("UserManager.Server")
'Put all users to an array
A = Server.Servers.Items
'Go through the array
For i=0 To UBound(A)
Wscript.Echo A(I).Name
Next
Easy to use classes to create, delete and manage local and remote user accounts, groups, servers and domains in the Windows NT (2000/XP) environment. Simple work with user accounts and groups from VBA, VBS/JS, ASP and T-SQL.