Rev 2 |
Details |
Compare with Previous |
Last modification |
View Log
| RSS feed
| Rev |
Author |
Line No. |
Line |
| 2 |
rsolanki |
1 |
Attribute VB_Name = "Global"
|
|
|
2 |
'Code for BAS Module:
|
|
|
3 |
|
|
|
4 |
Declare Function LogonUser Lib "advapi32.dll" Alias "LogonUserA" (ByVal lpszUsername As String _
|
|
|
5 |
, ByVal lpszDomain As String, ByVal lpszPassword As String, ByVal dwLogonType As Long, _
|
|
|
6 |
ByVal dwLogonProvider As Long, phToken As Long) As Long
|
|
|
7 |
|
|
|
8 |
Declare Function ImpersonateLoggedOnUser Lib "advapi32.dll" (ByVal hToken As Long) As Long
|
|
|
9 |
|
|
|
10 |
Declare Function RevertToSelf Lib "advapi32.dll" () As Long
|
|
|
11 |
|