Sample code for 30+ languages & platforms
Visual FoxPro

Set the JWS Payload

See more JSON Web Signatures (JWS) Examples

Demonstrates Jws.SetPayload, which sets the content to be signed. The charset converts the text to bytes, and a flag controls whether a byte-order mark is included.

Background. JWS (JSON Web Signature) integrity-protects a payload with a signature or MAC. The header alg names the algorithm; this example uses HMAC-SHA256 (HS256) with a symmetric MAC key.

Chilkat Visual FoxPro Downloads

Visual FoxPro
LOCAL lnSuccess
LOCAL loJws
LOCAL lnBIncludeBom

lnSuccess = 0

loJws = CreateObject('Chilkat.Jws')

*  Set the payload (the content to be signed).  The 2nd argument is the charset used to convert the
*  text to bytes, and the 3rd controls whether a byte-order mark is included.
lnBIncludeBom = 0
lnSuccess = loJws.SetPayload("This is the content to sign.","utf-8",lnBIncludeBom)
IF (lnSuccess = 0) THEN
    ? loJws.LastErrorText
    RELEASE loJws
    CANCEL
ENDIF

? "Payload set."

RELEASE loJws