VB.NET UWP/WinRT Stripe: Retrieve a Dispute

Back to Index

Retrieves the dispute with the given ID.

Documentation: https://stripe.com/docs/api/curl#retrieve_dispute

CURL Command

curl https://api.stripe.com/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a \
   -u STRIPE_SECRET_KEY:

VB.NET UWP/WinRT Example

Dim rest As New Chilkat.Rest
Dim success As Boolean

'  URL: https://api.stripe.com/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a
Dim bTls As Boolean = True
Dim port As Integer = 443
Dim bAutoReconnect As Boolean = True
success = Await rest.ConnectAsync("api.stripe.com",port,bTls,bAutoReconnect)
If (success <> True) Then
    Debug.WriteLine("ConnectFailReason: " & rest.ConnectFailReason)
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


rest.SetAuthBasic("STRIPE_SECRET_KEY","")


Dim sbResponseBody As New Chilkat.StringBuilder
success = Await rest.FullRequestNoBodySbAsync("GET","/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a",sbResponseBody)
If (success <> True) Then
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


Dim jsonResponse As New Chilkat.JsonObject
jsonResponse.LoadSb(sbResponseBody)

Dim id As String
Dim object As String
Dim amount As Integer
Dim balance_transaction As String
Dim charge As String
Dim created As Integer
Dim currency As String
Dim evidenceAccess_activity_log As Boolean
Dim evidenceBilling_address As Boolean
Dim evidenceCancellation_policy As Boolean
Dim evidenceCancellation_policy_disclosure As Boolean
Dim evidenceCancellation_rebuttal As Boolean
Dim evidenceCustomer_communication As Boolean
Dim evidenceCustomer_email_address As Boolean
Dim evidenceCustomer_name As Boolean
Dim evidenceCustomer_purchase_ip As Boolean
Dim evidenceCustomer_signature As Boolean
Dim evidenceDuplicate_charge_documentation As Boolean
Dim evidenceDuplicate_charge_explanation As Boolean
Dim evidenceDuplicate_charge_id As Boolean
Dim evidenceProduct_description As Boolean
Dim evidenceReceipt As Boolean
Dim evidenceRefund_policy As Boolean
Dim evidenceRefund_policy_disclosure As Boolean
Dim evidenceRefund_refusal_explanation As Boolean
Dim evidenceService_date As Boolean
Dim evidenceService_documentation As Boolean
Dim evidenceShipping_address As Boolean
Dim evidenceShipping_carrier As Boolean
Dim evidenceShipping_date As Boolean
Dim evidenceShipping_documentation As Boolean
Dim evidenceShipping_tracking_number As Boolean
Dim evidenceUncategorized_file As Boolean
Dim evidenceUncategorized_text As Boolean
Dim evidence_detailsDue_by As Integer
Dim evidence_detailsHas_evidence As Boolean
Dim evidence_detailsPast_due As Boolean
Dim evidence_detailsSubmission_count As Integer
Dim is_charge_refundable As Boolean
Dim livemode As Boolean
Dim reason As String
Dim status As String
Dim i As Integer
Dim count_i As Integer

id = jsonResponse.StringOf("id")
object = jsonResponse.StringOf("object")
amount = jsonResponse.IntOf("amount")
balance_transaction = jsonResponse.StringOf("balance_transaction")
charge = jsonResponse.StringOf("charge")
created = jsonResponse.IntOf("created")
currency = jsonResponse.StringOf("currency")
evidenceAccess_activity_log = jsonResponse.IsNullOf("evidence.access_activity_log")
evidenceBilling_address = jsonResponse.IsNullOf("evidence.billing_address")
evidenceCancellation_policy = jsonResponse.IsNullOf("evidence.cancellation_policy")
evidenceCancellation_policy_disclosure = jsonResponse.IsNullOf("evidence.cancellation_policy_disclosure")
evidenceCancellation_rebuttal = jsonResponse.IsNullOf("evidence.cancellation_rebuttal")
evidenceCustomer_communication = jsonResponse.IsNullOf("evidence.customer_communication")
evidenceCustomer_email_address = jsonResponse.IsNullOf("evidence.customer_email_address")
evidenceCustomer_name = jsonResponse.IsNullOf("evidence.customer_name")
evidenceCustomer_purchase_ip = jsonResponse.IsNullOf("evidence.customer_purchase_ip")
evidenceCustomer_signature = jsonResponse.IsNullOf("evidence.customer_signature")
evidenceDuplicate_charge_documentation = jsonResponse.IsNullOf("evidence.duplicate_charge_documentation")
evidenceDuplicate_charge_explanation = jsonResponse.IsNullOf("evidence.duplicate_charge_explanation")
evidenceDuplicate_charge_id = jsonResponse.IsNullOf("evidence.duplicate_charge_id")
evidenceProduct_description = jsonResponse.IsNullOf("evidence.product_description")
evidenceReceipt = jsonResponse.IsNullOf("evidence.receipt")
evidenceRefund_policy = jsonResponse.IsNullOf("evidence.refund_policy")
evidenceRefund_policy_disclosure = jsonResponse.IsNullOf("evidence.refund_policy_disclosure")
evidenceRefund_refusal_explanation = jsonResponse.IsNullOf("evidence.refund_refusal_explanation")
evidenceService_date = jsonResponse.IsNullOf("evidence.service_date")
evidenceService_documentation = jsonResponse.IsNullOf("evidence.service_documentation")
evidenceShipping_address = jsonResponse.IsNullOf("evidence.shipping_address")
evidenceShipping_carrier = jsonResponse.IsNullOf("evidence.shipping_carrier")
evidenceShipping_date = jsonResponse.IsNullOf("evidence.shipping_date")
evidenceShipping_documentation = jsonResponse.IsNullOf("evidence.shipping_documentation")
evidenceShipping_tracking_number = jsonResponse.IsNullOf("evidence.shipping_tracking_number")
evidenceUncategorized_file = jsonResponse.IsNullOf("evidence.uncategorized_file")
evidenceUncategorized_text = jsonResponse.IsNullOf("evidence.uncategorized_text")
evidence_detailsDue_by = jsonResponse.IntOf("evidence_details.due_by")
evidence_detailsHas_evidence = jsonResponse.BoolOf("evidence_details.has_evidence")
evidence_detailsPast_due = jsonResponse.BoolOf("evidence_details.past_due")
evidence_detailsSubmission_count = jsonResponse.IntOf("evidence_details.submission_count")
is_charge_refundable = jsonResponse.BoolOf("is_charge_refundable")
livemode = jsonResponse.BoolOf("livemode")
reason = jsonResponse.StringOf("reason")
status = jsonResponse.StringOf("status")
i = 0
count_i = jsonResponse.SizeOfArray("balance_transactions")
While i < count_i
    jsonResponse.I = i
    i = i + 1
End While

Sample JSON Response Body

{
  "id": "dp_1BnETJGswQrCoh0Xefx4zP2a",
  "object": "dispute",
  "amount": 1000,
  "balance_transaction": "txn_1BnETJGswQrCoh0XPNBs9uW2",
  "balance_transactions": [
  ],
  "charge": "ch_1BnETJGswQrCoh0XlANDK278",
  "created": 1516662781,
  "currency": "usd",
  "evidence": {
    "access_activity_log": null,
    "billing_address": null,
    "cancellation_policy": null,
    "cancellation_policy_disclosure": null,
    "cancellation_rebuttal": null,
    "customer_communication": null,
    "customer_email_address": null,
    "customer_name": null,
    "customer_purchase_ip": null,
    "customer_signature": null,
    "duplicate_charge_documentation": null,
    "duplicate_charge_explanation": null,
    "duplicate_charge_id": null,
    "product_description": null,
    "receipt": null,
    "refund_policy": null,
    "refund_policy_disclosure": null,
    "refund_refusal_explanation": null,
    "service_date": null,
    "service_documentation": null,
    "shipping_address": null,
    "shipping_carrier": null,
    "shipping_date": null,
    "shipping_documentation": null,
    "shipping_tracking_number": null,
    "uncategorized_file": null,
    "uncategorized_text": null
  },
  "evidence_details": {
    "due_by": 1518307199,
    "has_evidence": false,
    "past_due": false,
    "submission_count": 0
  },
  "is_charge_refundable": false,
  "livemode": false,
  "metadata": {},
  "reason": "general",
  "status": "needs_response"
}