由网友(霓虹灯下的少年)分享简介：我们需要验证在使用Delphi 7微软的Active Directory，什么是做到这一点的最好办法是用户？We need to validate an user on Microsoft's Active Directory using Delphi 7, what is the best way to do th...

我们需要验证在使用Delphi 7微软的Active Directory，什么是做到这一点的最好办法是用户？

We need to validate an user on Microsoft's Active Directory using Delphi 7, what is the best way to do that?

我们可以有两种情况：用户输入其网络用户名和密码，其中用户名可以包含域，我们在活动目录检查它是否是一个有效的用户。或者，我们得到的Windows当前登录的用户，并检查AD是否仍然有效。

We can have two scenarios: the user inputs its network username and password, where the username may include the domain, and we check on active directory if it is a valid, active user. Or we get the current logged user from Windows, and check on AD if it is still valid.

第一种方案需要用户验证，而第二个只是一个简单的广告搜索和定位。

The first scenario requires user validation, while the second one just a simple AD search and locate.

有谁知道，做一个或两个上述方案的组件或code的？

Does anyone know of components or code that do one or both of the scenarios described above?

推荐答案

我受宠若惊地看到我的ADSISearch组件这里提到:-)，但为了简单地验证用户凭据，你可能甚至最好使用LogonUser的Win32 API的。我是pretty的确定（没有做任何德尔福工作了我自己），其有一个实现了漂浮的地方 - 大概在JVCL图书馆或其他地方

I'm flattered to see my ADSISearch component mentioned here :-), but in order to simply validate user credentials, you're probably even better off using the "LogonUser" Win32 API. I'm pretty sure (not doing any Delphi work anymore myself) that there's an implementation of that floating around somewhere - probably in the JVCL library or somewhere else.