Chilkat Online Tools

VB6 / Afterpay Online US API v2 / Get Payment By Token

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

http.BasicAuth = 1
http.Login = "100100248"
http.Password = "117f3fe5a01a0e400f3e4782baf8ffa43a9d21e9217a15f50d545bc72480d081ecaecc1d6a42ac7a785b7437232bd4cf62dbee679b78a75a3892547059018f9b"

http.SetRequestHeader "Accept","*/*"

Dim sbResponseBody As New ChilkatStringBuilder
success = http.QuickGetSb("https://api.us-sandbox.afterpay.com/v2/payments/token:{{token}}",sbResponseBody)
If (success = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

Debug.Print "Response status code = " & http.LastStatus
Debug.Print sbResponseBody.GetAsString()

Curl Command

curl -X GET
	-u '100100248:117f3fe5a01a0e400f3e4782baf8ffa43a9d21e9217a15f50d545bc72480d081ecaecc1d6a42ac7a785b7437232bd4cf62dbee679b78a75a3892547059018f9b'
	-H "Accept: */*"
https://api.us-sandbox.afterpay.com/v2/payments/token:{{token}}

Postman Collection Item JSON

{
  "name": "Get Payment By Token",
  "request": {
    "method": "GET",
    "header": [
      {
        "key": "Accept",
        "value": "*/*"
      }
    ],
    "url": {
      "raw": "https://api.us-sandbox.afterpay.com/v2/payments/token:{{token}}",
      "protocol": "https",
      "host": [
        "api",
        "us-sandbox",
        "afterpay",
        "com"
      ],
      "path": [
        "v2",
        "payments",
        "token:{{token}}"
      ]
    },
    "description": "Retrieves an individual payment along with its order details - using the token, as the request parameter."
  },
  "response": [
  ]
}