信息系统中用户的域AD认证功能

最新推荐文章于 2024-07-28 21:18:06 发布

weixin_30892889

最新推荐文章于 2024-07-28 21:18:06 发布

阅读量194

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/songrun/archive/2013/06/08/3125992.html

本文详细介绍了LogonUser函数的功能及使用方法。该函数用于尝试将用户登录到本地计算机上，并通过用户名、域及明文密码来指定和验证用户。若成功，则返回一个代表已登录用户的令牌句柄。

{

The LogonUser function attempts to log a user on to the local computer. The local computer is the computer from which LogonUser was called. You cannot use LogonUser to log on to a remote computer. You specify the user with a user name and domain and authenticate the user with a plaintext password. If the function succeeds, you receive a handle to a token that represents the logged-on user. You can then use this token handle to impersonate the specified user or, in most cases, to create a process that runs in the context of the specified user.

BOOL LogonUser(
__in      LPTSTR lpszUsername,//UserName
__in_opt  LPTSTR lpszDomain,//Domain
__in_opt  LPTSTR lpszPassword,//password
__in      DWORD dwLogonType,//Logon Type
__in      DWORD dwLogonProvider,//LogonProvider
__out     PHANDLE phToken//A pointer to a handle variable that receives a handle to a token that represents the specified user

);

}

 1 function   ValidateUserLogonAPI(const   UserName:   string; const   PassWord:   string):   boolean;
 2 
 3 var
 4 
 5     Retvar:   boolean;
 6 
 7     LHandle:   THandle;
 8 
 9 begin
10 
11     Retvar   :=   LogonUser(PChar(UserName),
12 
13         PChar(string(OP_ADDomain)),   PChar(PassWord),
14 
15         LOGON32_LOGON_NETWORK,//This logon type is intended for high performance servers to authenticate plaintext passwords. The LogonUser function does not                                              //cache credentials for this logon type.
16 
17         LOGON32_PROVIDER_DEFAULT,//Use the standard logon provider for the system.
18 
19         LHandle);
20 
21     if   Retvar   then
22 
23         CloseHandle(LHandle);//close the handle
24 
25     Result   :=   Retvar;
26 
27 end;