This documentation was styled with a demo skin from the Premium Pack 4 add-on for Help & Manual. The contents of the skin are encrypted and not configurable. You can only publish HM projects with this skin. You cannot edit it or change it.
This version is copyright and may only be used for local testing purposes. It may not be distributed.
Please purchase the full version of the Premium Pack to get the configurable skins and remove this notice. The package will also include the Toolbox configuration utility for Premium Pack skins.
Description
Retrieves the first or next available cryptographic service providers (CSPs).
Used in a loop, this function can retrieve in sequence all of the CSPs available on a computer.
Syntax
s = Crypto_EnumProviders(nIndex)
Returns
String
The name of selected cryptographic service providers (CSPs).
Parameters
Name |
Type |
Optional |
Meaning |
nIndex |
Numeric |
No |
A zero based index of the CSPs list |
Remarks
This functions is based on Microsoft's PROV_RSA_FULL Cryptographic Service Provider Type.
Restrictions
See also
Crypto_EnumProviderTypes, Crypto_GetDefaultProvider, Crypto_GetProvidersCount
Examples
USES "Console"
Dim nCount As Long
Dim i As Long
nCount = Crypto_GetProvidersCount() - 1 ' zero based index
For i = 0 To nCount
PrintL format$(i + 1, "00") + ") " + Crypto_EnumProviders(i)
Next