Quantcast
Channel: Directory Services forum
Viewing all articles
Browse latest Browse all 31638

Retrieve AD managedby attribute for computer

$
0
0

Greetings,

I am trying to retrieve just the managedby field of computers in AD. I need to use vbscript and not powershell. I just need the value, but it comes back as a DN. Here is the script I have

Const ADS_SCOPE_SUBTREE = 2
Set objConnection = CreateObject("ADODB.Connection")
Set objCommand = CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"
Set objCommand.ActiveConnection = objConnection
objCommand.Properties("Page Size") = 1000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE
objCommand.CommandText = "SELECT Name, managedBy FROM 'LDAP://OU=Servers,DC=contoso,DC=net' WHERE objectCategory='computer'"
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
Wscript.Echo objRecordSet.Fields("Name").Value
Wscript.Echo objRecordSet.Fields("managedBy").Value
Wscript.Echo
objRecordSet.MoveNext
Loop

It returns something like this

Servername
CN=123456,OU=Users,DC=contoso,DC=net

I just want to bring back the the server name and owner

Servername

123456

Thanks in advance. I know not too many people use vbscript any longer

:)


Mike Hanlon


Viewing all articles
Browse latest Browse all 31638

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>