Retrieves the token with the given ID.
curl https://api.stripe.com/v1/tokens/tok_1BnETKGswQrCoh0XcX6WAG5q \
-u STRIPE_SECRET_KEY:
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)
set rest = CreateObject("Chilkat_9_5_0.Rest")
' URL: https://api.stripe.com/v1/tokens/tok_1BnETKGswQrCoh0XcX6WAG5q
bTls = 1
port = 443
bAutoReconnect = 1
success = rest.Connect("api.stripe.com",port,bTls,bAutoReconnect)
If (success <> 1) Then
outFile.WriteLine("ConnectFailReason: " & rest.ConnectFailReason)
outFile.WriteLine(rest.LastErrorText)
WScript.Quit
End If
success = rest.SetAuthBasic("STRIPE_SECRET_KEY","")
set sbResponseBody = CreateObject("Chilkat_9_5_0.StringBuilder")
success = rest.FullRequestNoBodySb("GET","/v1/tokens/tok_1BnETKGswQrCoh0XcX6WAG5q",sbResponseBody)
If (success <> 1) Then
outFile.WriteLine(rest.LastErrorText)
WScript.Quit
End If
set jsonResponse = CreateObject("Chilkat_9_5_0.JsonObject")
success = jsonResponse.LoadSb(sbResponseBody)
id = jsonResponse.StringOf("id")
object = jsonResponse.StringOf("object")
cardId = jsonResponse.StringOf("card.id")
cardObject = jsonResponse.StringOf("card.object")
cardAddress_city = jsonResponse.IsNullOf("card.address_city")
cardAddress_country = jsonResponse.IsNullOf("card.address_country")
cardAddress_line1 = jsonResponse.IsNullOf("card.address_line1")
cardAddress_line1_check = jsonResponse.IsNullOf("card.address_line1_check")
cardAddress_line2 = jsonResponse.IsNullOf("card.address_line2")
cardAddress_state = jsonResponse.IsNullOf("card.address_state")
cardAddress_zip = jsonResponse.IsNullOf("card.address_zip")
cardAddress_zip_check = jsonResponse.IsNullOf("card.address_zip_check")
cardBrand = jsonResponse.StringOf("card.brand")
cardCountry = jsonResponse.StringOf("card.country")
cardCvc_check = jsonResponse.IsNullOf("card.cvc_check")
cardDynamic_last4 = jsonResponse.IsNullOf("card.dynamic_last4")
cardExp_month = jsonResponse.IntOf("card.exp_month")
cardExp_year = jsonResponse.IntOf("card.exp_year")
cardFingerprint = jsonResponse.StringOf("card.fingerprint")
cardFunding = jsonResponse.StringOf("card.funding")
cardLast4 = jsonResponse.StringOf("card.last4")
cardName = jsonResponse.IsNullOf("card.name")
cardTokenization_method = jsonResponse.IsNullOf("card.tokenization_method")
client_ip = jsonResponse.IsNullOf("client_ip")
created = jsonResponse.IntOf("created")
livemode = jsonResponse.BoolOf("livemode")
type = jsonResponse.StringOf("type")
used = jsonResponse.BoolOf("used")
outFile.Close
{
"id": "tok_1BnETKGswQrCoh0XcX6WAG5q",
"object": "token",
"card": {
"id": "card_1BnETKGswQrCoh0Xa7UvZihk",
"object": "card",
"address_city": null,
"address_country": null,
"address_line1": null,
"address_line1_check": null,
"address_line2": null,
"address_state": null,
"address_zip": null,
"address_zip_check": null,
"brand": "Visa",
"country": "US",
"cvc_check": null,
"dynamic_last4": null,
"exp_month": 8,
"exp_year": 2019,
"fingerprint": "F9mANtIt1TaukpRJ",
"funding": "credit",
"last4": "4242",
"metadata": {},
"name": null,
"tokenization_method": null
},
"client_ip": null,
"created": 1516662782,
"livemode": false,
"type": "card",
"used": false
}