Xojo Plugin
Xojo Plugin
Example: Http.SetOAuthRsaKey method
Demonstrates theSetOAuthRsaKey method.
Chilkat Xojo Plugin Downloads
Dim success As Boolean
success = False
Dim pfx As New Chilkat.Pfx
success = pfx.LoadPfxFile("qa_data/pfx/MCD_Sandbox_chilkat_iccp_API_Keys/chilkat_iccp-sandbox.p12","keystorepassword")
If (success = False) Then
System.DebugLog(pfx.LastErrorText)
Return
End If
Dim privKey As New Chilkat.PrivateKey
success = pfx.PrivateKeyAt(0,privKey)
If (success = False) Then
System.DebugLog(pfx.LastErrorText)
Return
End If
Dim http As New Chilkat.Http
// Use OAuth1.0a authentication.
http.OAuth1 = True
// Use your own consumer key (this is not a valid consumer key)
http.OAuthConsumerKey = "123abc"
http.OAuthSigMethod = "RSA-SHA256"
success = http.SetOAuthRsaKey(privKey)
If (success = False) Then
System.DebugLog(http.LastErrorText)
Return
End If
// Tell Chilkat to automatically calculate and add the oauth_body_hash field when sending the request.
http.OAuthBodyHash = True
// Send this request to an endpoint at chilkatsoft.com. The purpose of this example is to show
// how the OAuth1.0a Authorization header is computed and sent by Chilkat.
// The chilkatsoft.com site itself doesn't do OAuth1. It's just ignoring the Authorization header.
Dim resp As New Chilkat.HttpResponse
success = http.HttpStr("POST","https://chilkatsoft.com/echo_request_body.asp","<notUsed>123</notUsed>","utf-8","application/xml",resp)
If (success = False) Then
System.DebugLog(http.LastErrorText)
Return
End If
// Examine the request header we just sent..
System.DebugLog(http.LastHeader)
// Sample output:
// POST /echo_request_body.asp HTTP/1.1
// Host: chilkatsoft.com
// Accept: */*
// Accept-Encoding: gzip
// Content-Type: application/xml
// Content-Length: 22
// Authorization: OAuth oauth_consumer_key="123abc", oauth_nonce="A2E91C3B53E0BD7FBF71F441336679E358DDCEEE", oauth_body_hash="a5kPTsDwUwmBjC0voNlAAvM6YoaRS5X7sTO49jl3/h8=", oauth_timestamp="1756324932", oauth_signature_method="RSA-SHA256", oauth_version="1.0", oauth_signature="*****"