Visual Basic 6.0

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 Basic 6.0 Downloads

Download Chilkat for Visual Basic 6.0

Visual Basic 6.0

Dim success As Long
success = 0

Dim jws As New ChilkatJws

'  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.
Dim bIncludeBom As Long
bIncludeBom = 0
success = jws.SetPayload("This is the content to sign.","utf-8",bIncludeBom)
If (success = 0) Then
    Debug.Print jws.LastErrorText
    Exit Sub
End If

Debug.Print "Payload set."