Getting Servers not Computers using ADSI and VBS

[DROFNUD]

In VBS using ADSI and this code:

Set ou = getObject( "WinNT://" & DOMAIN )
ou.filter = "Computer"
for each computer in ou
...
next

I can use the filter to extract computers from a domain.

Hw do I tell the difference between Servers and Workstations, or Domain controllers against member servers? There must be a property to differentiate them, but I can't find it.

Cheers in advance
Simon...

 

[DROFNUD]

Soory that scriptlet shoul'd have read:

Set ou = getObject( "WinNT://" & DOMAIN )
ou.filter = array("Computer&quot
for each computer in ou
...
next

 

[Meldric]

I am working on it. I know it is possible.

One way I have figured out is to do the following:

set g_oComputers = getObject("LDAP://CN=Computers,dc=DOMAIN,dc=COM")

for each oPC in g_oComputers
  msgbox g_oPC.OperatingSystem
next

This will print out the OS of each computer in that container. Win2K Server would be: "Windows 2000 Server". You could easily do a IF statement to find which are servers and which are PCs.

If that doesn't work for you I can keep looking. Let me know.

Roger

 

[DROFNUD]

Roger,

Win2000 Active directory and Exchange are LDAP directories, NT isn't. You can only use the Winnt provider on an NT network.

So the sample provided won't work, thanks though.
Si...

 

[Meldric]

I realized that after I had posted. Even though both work in a W2K domain interestingly enough. I am still trying to find a reliable way in a NT4.0 domain.

Roger

 

[DROFNUD]

It's odd! There has to be something in there to differentiate them.

I suppose I could look for the NETLOGON share to identify a domain controller, but this wouldn't help in identifying the PDC or other servers.

Is there a service that is unique to servers?

Thanks,
Si...