(Visual FoxPro) ScMinidriver - Acquire Context with Smart Card or USB Token

See more ScMinidriver Examples

Initializes communication with the card inserted in the given reader (or a USB token). Reader names can be discovered via the SCard.ListReaders or SCard.FindSmartcards methods. If successful, the Atr and CardName properties will be set.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loScmd
LOCAL lcReaderName
LOCAL lnSuccess
LOCAL lcCardName

* This example requires the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.ScMinidriver')
loScmd = CreateObject('Chilkat.ScMinidriver')

* Reader names (smart card readers or USB tokens) can be discovered
* via List Readers or Find Smart Cards
lcReaderName = "Alcor Micro USB Smart Card Reader 0"
lnSuccess = loScmd.AcquireContext(lcReaderName)
IF (lnSuccess = 0) THEN
    ? loScmd.LastErrorText
    RELEASE loScmd
    CANCEL
ENDIF

* If we are successful, the name of the currently inserted smart card is available:
lcCardName = loScmd.CardName
? "Card name: " + lcCardName

* Also, the ATR of the inserted card is available (you will likely not need the ATR).
? "ATR: " + loScmd.Atr

* Also, the maximum number of key containers is readily available:
? "Max number of key containers = " + STR(loScmd.MaxContainers)

* Delete the context when finished with the card.
lnSuccess = loScmd.DeleteContext()
IF (lnSuccess = 0) THEN
    ? loScmd.LastErrorText
ENDIF

* Sample output:

* Card name: IDPrime MD T=0
* ATR: 3B7F96000080318065B0855956FB120FFE829000
* Max number of key containers = 20

RELEASE loScmd