How to get the active directory out

**snowei1** · Mar 21st, 2004, 11:09 PM

I currently have a program in the PC. I want to be able to take in the username and password when he login to the PC and check if he is able to access my program. Only administrator is able to access it so I want to prevent people with user domain from running my program.

How can I do it.
Please provide some sample codes if possible.
Thanks

**phinds** · Mar 22nd, 2004, 05:29 AM

Public Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

retVal = GetuserName(uName, 255)

if nName= "Admin" then do your thing

**snowei1** · Mar 22nd, 2004, 07:51 PM

actually, I want to get the domain too but do not know the code. Please help.

**RobDog888** · Mar 22nd, 2004, 08:43 PM

You say that you want to "prevent people with user domain from
running my program." if you mean users that are in the Domain
Users group then I'm not sure, but if you mean that you just
want to get the available domains then try my code in this thread.

**snowei1** · Mar 22nd, 2004, 08:45 PM

And in addition, I have put a login page at my program.This is because in case my administrator is careless and forget to logout of the window, and a user try to use the program. I want to stop the user from accessing the program. This program is suppose to be usable my administrator only.The domain in the window which I want to use to compare if the person using the program is from the admin domain.

Thanks

**RobDog888** · Mar 22nd, 2004, 08:58 PM

Then you are talking about detecting the user anme and what
group it is a member of.

**RobDog888** · Mar 22nd, 2004, 09:03 PM

If you search the forums you usually can find an answer.
Try this thread.

Thread: How to get the active directory out

Thread Tools

Display

How to get the active directory out

Posting Permissions