Visual FoxPro
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
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