Active Directory scripts

[water]

I've received a lot of support from this forum. I would like to return a little bit and if someone is interested share some of my Active Directory scripts.

The programs and docus are written in german. I would prepare them for english users if anyone is interested.

So far I've written 4 scripts for our support team and key accounts.

ADQU - Active Directory Query User:

You can select users by Name, Department or Initials. When you select a user all groups where he is a member of are displayed. When you select one of this groups all members of the group are displayed.

Different access levels are granted to 3 groups (IT - can query all users, key account - can query users of the same department, ordinary users - can only query himself)

ADQG - Active Directory Query Groups:

You can select groups by Name or Dataowner (info-field). When you select a group all members of the group are displayed.

ADCU - Active Directory Compare Users:

Lets you compare two users and show groups that only the left, right or both users are members of.

ADCG - Active Directory Compare Groups:

Lets you compare two groups and show all members that only the left, right or both groups are members of.

In all scripts you can filter the records, export them to excel, email or the clipboard. A right click on an item will give you all details.

Kind regards

Thomas

Edited November 10, 2008 by water

[gseller]

app? code?

[water]

Hi gesller,

app? code?

It's company dependant and written in german. Would that be OK for you for the moment? Otherwise it would take some time to translate to english.

Thomas

[infernothebest]

yes

[gseller]

Sure.. I am sure we have some great programers in the forum that would be fine with that.. Thanks...

[water]

Here you are.

To get access to the full functionality you have to make sure that the line (#130 in ADQU)

If StringLeft($sOrgeinheitEX, 6) = "IK INS" Or @UserName = "ADT" Or @UserName = "MCH" Then

returns TRUE.

You also have to change the following line to the root of your Active Directory

$ou = "DC=microsoft,DC=com"             ; Root des AD

You need the Adfunctions.au3 UDF which can be found at

http://www.autoitscript.com/forum/index.php?showtopic=37378 or http://www.autoitscript.com/forum/index.ph...st&id=22018

If you can tell me which of this programs is of most use for you I will be glad to translate them and make them company independant.

Good luck

Thomas

<21.02.2010: I deleted the attachement because I ran out of space. If you need the script please drop me a note>

Edited February 21, 2010 by water