Active Directory Question

[Vaeb]

Hello Guys

I am trying to get into Active Directory changing with AutoIt.

I don't really know how i have to define the variables to get it working.

I just started but it doesnt work.

It gets an error at this one: Global $strDNSDomain = $objRootDSE.Get ("local.area.de")

Can you tell me how to i have to define the Variables to get it working?

Global $objConnection = ObjCreate("ADODB.Connection")  ; Create COM object to AD
$objConnection.ConnectionString = "Provider=ADsDSOObject"
$objConnection.Open ("Active Directory Provider") 

Global $objRootDSE = ObjGet("LDAP://RootDSE")
Global $strDNSDomain = $objRootDSE.Get ("local.area.de")  ; Retrieve the current AD domain name
Global $strHostServer = $objRootDSE.Get ("server7.local.area.de") ; Retrieve the name of the connected DC
Global $strConfiguration = $objRootDSE.Get ("ConfigurationNamingContext") ; Retrieve the Configuration naming context

Global $loggedonusergroups  ; populate this with the logged on user groups in your own app


Func _ADObjectExists($object)
    $strQuery = "<LDAP://" & $strHostServer & "/" & $strDNSDomain & ">;(sAMAccountName=" & $object & ");ADsPath;subtree"
    $objRecordSet = $ObjConnection.Execute ($strQuery)  ; Retrieve the FQDN for the group, if it exists
    
    If $objRecordSet.RecordCount = 1 Then
        $objRecordSet = 0
        Return 1
    Else
        $objRecordSet = 0
        Return 0
    EndIf
EndFunc   ;==>_ADObjectExists

_ADObjectExists("umueller")

Edited January 22, 2009 by Vaeb

[water]

OK, two questions:

• Please download ADfunctions.au3 from http://www.autoitscript.com/forum/index.ph...amp;showfile=66 and have a look at the comments
• What kind of information do you want to extract from AD (list of users, computers, groups ..)

[Vaeb]

In this case i want to see if a user exists.

Edited January 22, 2009 by Vaeb

[someone]

Im new to adfucntions, but this works to see if a user exists....

#include <adfunctions.au3>

$ret = _ADObjectExists("user")
MsgBox(0, "ret, 1 yes 0 no", $ret)

[water]

So I would use function _ADObjectExists. As a parameter you'll have to provide the sAMAccountname of the user.

Use ADExplorer from sysinternals to get a good look at your AD (or search this forum for ADExplorer - I'll find some post with my comments)

[Vaeb]

I'm not trying to find out if a user exists, I am just trying to use a random AD function to see if I get it working.

what did I do wrong at the example i posted at the top?

I am already using the AD Explorer. The SAMAccountname is correct...

[water]

Have a look at ADfunctions.au3 line 104/105. Could you change your lines to

Global $strDNSDomain = $objRootDSE.Get("defaultNamingContext") ; Retrieve the current AD domain name
Global $strHostServer = $objRootDSE.Get("dnsHostName") ; Retrieve the name of the connected DC

and retry?

[Vaeb]

lol it works^^

sorry, i thougt that i have to change the variables

[Holli]

Hello

I need a function that list all Domain Computers.

Can somebody give me an example?

[water]

Use something like

_ADGetObjectseOU($asComputer, $sOU, "objectCategory=computer", 2, "cn,operatingSystem")

$asComputer is the receiving array and $sOU is the OU where to start your search.