Kbase P44718: How to call the CryptAcquireContextA API
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
26/09/2003 |
|
Status: Unverified
GOAL:
How to call the CryptAcquireContextA API
FIX:
DEFINE VARIABLE iHandle AS INTEGER NO-UNDO.
RUN CryptAcquireContextA (
OUTPUT iHandle,
INPUT 0,
INPUT "VERIFYCONTEXT",
INPUT "Test",
INPUT 0,
INPUT 1).
MESSAGE iHandle
VIEW-AS ALERT-BOX INFO BUTTONS OK.
PROCEDURE CryptAcquireContextA EXTERNAL "ADVAPI32.dll":
DEFINE RETURN PARAMETER lReturn AS LONG.
DEFINE INPUT PARAMETER phProv AS LONG.
DEFINE INPUT PARAMETER pszContainer AS CHARACTER.
DEFINE INPUT PARAMETER psxProvider AS CHARACTER.
DEFINE INPUT PARAMETER dwProvType AS LONG.
DEFINE INPUT PARAMETER dwFlags AS LONG.
END PROCEDURE.