Active Directory Tool: Userinfo

[Marc 0]

Hi all,

a long time ago I wanted a comfortable tool to get information of a specified user in our active directory.
After some searching I decided to create my own tool and "Userinfo" was born.

• displays all useful information about the user (retrieved from active directory)
• displays the PCs/NCs the user has (if this information can be retrieved from a database)
• displays the list of neighbours of the current user
• compares the active directoy groups of the selected user with another user
• unlock a locked account
• german/english user interface

Here's a screenshot of what Userinfo looks like:

The active directory-code has been shamelessly stolen from inspired by the excellent ">Active Directory UDF" created by water.

Feel free to adjust it to your needs
For example, you have to adjust the lines 893/4, 1469/70, 1555/6 and 2018/9 to the adresses your own databases to include PC-Information.

(Currently the first command in the functions for database-query is just a simple Return.)

Userinfo v2.80

Userinfo.zip

Hopefully some of you will find it useful...

best regards,
Marc

Edited July 29, 2013 by Marc

[water 1,653]

Good looking example

I'm going to post a link on the Active Directory Example Scripts thread.

[kyo 1]

A very interesting tool...  Thanks for the code, it will be a good learning tool indeed!

[araneon 0]

because of what I have an error

---------------------------

---------------------------
We intercepted a COM Error!

Number is: 80005000

Windescription is:

err.description is:

err.source is:

err.helpfile is:

err.helpcontext is:

err.lastdllerror is: 0

err.retcode is:

Script Line number is: 605
---------------------------
OK
---------------------------

[araneon 0]

It seems to understand.
It was necessary to to specify the domain on 597 line?
Funk finde_domaene ($ user = "", $ domaene = "DOMANE.RU")

[Battalion 0]

Hey Marc,

 

are you still supporting this? when I click on "Neighbours" I get a COM error:

 

We Intercepted a COM Error! Number is :80020006

windescription is: Uknown Name

 

 

is there an updated version?

[Marc 0]

On 2.12.2015 at 7:34 AM, araneon said:

It seems to understand.
It was necessary to to specify the domain on 597 line?
Funk finde_domaene ($ user = "", $ domaene = "DOMANE.RU")

Hi araneon, sorry for the late reply - after two years, I did not expect questions to come up

You can add a domain name here as default, which wil be used if no domain is chosen in the GUI. At least on my PC, the GUI displays all Domains known to the PC in the Listbox.

[Marc 0]

On 11.7.2016 at 7:10 PM, Battalion said:

are you still supporting this? when I click on "Neighbours" I get a COM error:

Hi Battalion,

sorry for the late answer. I am still using this tool (but in a different version - not multilingual and somewhat tweaked to fit in our specific environment).

Anyway, the function suche_nachbarn() does rely on the active directory having set the "physicalDeliveryOfficeName". I suppose the crash occures here, do you have a line number where the error occures to investigate this?