Error in Active Directory query

[ScottPostSr]

I have a vbsctript that pulls information from Active Directory.  I am trying to use similar code in AutoIT.

 

I have this:

This works all the way to the point where I try to get the properties from the user account, then I get "The requested action with this object has failed."
 

The vbscript works fine, I just can't figure out why AutoIT fails.

Edited July 29, 2013 by ScottPostSr

[water]

Welcome to AutoIt and the forum!

Can you please post the code you use?

[ScottPostSr]

AutoIT:

$ado = ObjCreate("ADODB.Connection")

$ado.Open("Provider=ADsDSOObject")

$dn = $rs.Fields("distinguishedName").Value

$strTSHDPath = $User.terminalservicesHomeDirectory

$strTSProfile = $User.terminalServicesProfilePath

$strProfile = $User.HomeDirectory

Vbscript

Set oADO = CreateObject("ADODB.Connection")

oADO.Open "Provider=ADsDSOObject"

sDN = oRS.Fields("distinguishedName").Value

strHomeDir = oUser.HomeDirectory

strTSHomeDir = oUser.terminalservicesHomeDirectory

strTSProfile = oUser.terminalservicesProfilePath

[ScottPostSr]

For some reason, I can't seem to post the GetObject or ObjGet statements but they are LDAP queries with the distinguishedName property

[water]

There is a UDF available to interact with Active Directory. For download please check my signature.

Makes coding and error handling much easier.

#include <AD.au3>
_AD_Open()
$sTSHomeDirectory = _AD_GetObjectAttribute(@Username, "terminalservicesHomeDirectory")

I can't test at the moment so I'm not sure you can access the TerminalServices attributes this way because they are stored in a BLOB.

[ScottPostSr]

I still can't pull up the terminal services properties with AutoIT but can with vbscript.  Can you tell me how to post my code so it retains all the lines?  I have it in a text file, but can't figure out how to upload the text file.

[water]

To upload a file click on "Full Editor / Attachments".