Visual Basic 6.0

CardConnect Delete Profile

See more CardConnect Examples

Demonstrates how to delete a profile.

A DELETE request to the profile endpoint deletes the stored data for the specified profile ID. ...

See https://developer.cardconnect.com/cardconnect-api?lang=json#delete-profile-request

Visual Basic 6.0

Dim success As Long
success = 0

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim http As New ChilkatHttp

http.BasicAuth = 1
http.Login = "API_USERNAME"
http.Password = "API_PASSWORD"

Dim url As String
url = "https://<site>.cardconnect.com:<port>/cardconnect/rest/profile/<profile ID>/<account ID>/<merchid>"
Dim responseStr As String
responseStr = http.QuickDeleteStr(url)
If (http.LastMethodSuccess = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

' A response status of 200 indicates potential success.  The JSON response body
' must be examined to determine if it was truly successful or an error.
Debug.Print "response status code = " & http.LastStatus

Dim jsonResp As New ChilkatJsonObject
success = jsonResp.Load(responseStr)
jsonResp.EmitCompact = 0

Debug.Print "response JSON:"
Debug.Print jsonResp.Emit()

' A successful response looks like this:

' {
'   "respproc": "PPS",
'   "resptext": "Profile Deleted",
'   "respstat": "A",
'   "respcode": "08"
' }
' 
'