VB6 / New FreshBooks / 2. [STRIPE] - Create Setup Intent Using Payment Method Key
Back to Collection Items
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim http As New ChilkatHttp
Dim success As Long
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "payment_method": "pm_d87sh438shuiasf4289437u"
' }
Dim json As New ChilkatJsonObject
success = json.UpdateString("payment_method","pm_d87sh438shuiasf4289437u")
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
Dim resp As ChilkatHttpResponse
Set resp = http.PostJson3("https://api.freshbooks.com/payments/account/E86Qp/gateway/stripe/credit-card/token","application/json",json)
If (http.LastMethodSuccess = 0) Then
Debug.Print http.LastErrorText
Exit Sub
End If
Debug.Print resp.StatusCode
Debug.Print resp.BodyStr
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '{
"payment_method": "pm_d87sh438shuiasf4289437u"
}'
https://api.freshbooks.com/payments/account/E86Qp/gateway/stripe/credit-card/token
Postman Collection Item JSON
{
"name": "2. [STRIPE] - Create Setup Intent Using Payment Method Key",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "{\n \"payment_method\": \"pm_d87sh438shuiasf4289437u\"\n}\n ",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "https://api.freshbooks.com/payments/account/E86Qp/gateway/stripe/credit-card/token",
"protocol": "https",
"host": [
"api",
"freshbooks",
"com"
],
"path": [
"payments",
"account",
"E86Qp",
"gateway",
"stripe",
"credit-card",
"token"
]
},
"description": "Once you obtain the PM key from Step 1, you will use this to inform Stripe that you will be using this card for future use and it is a \"Mail Order Telephone Order\" (MOTO) card. "
},
"response": [
]
}