Visual Basic 6.0

CardConnect Validate Merchant-Level Credentials

To test and validate merchant-level credentials, you can make a PUT request, including the merchant ID in the body of the request, to the base URL. The Gateway verifies that the MID matches the credentials provided in the header.

Chilkat Visual Basic 6.0 Downloads

Download Chilkat for Visual Basic 6.0

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 json As New ChilkatJsonObject
success = json.UpdateString("merchid","MERCHANT_ID")

Dim url As String
url = "https://<site>.cardconnect.com:<port>/cardconnect/rest/"

Dim resp As New ChilkatHttpResponse
success = http.HttpStr("PUT",url,json.Emit(),"utf-8","application/json",resp)
If (success = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

' If we get a 200 response status and an HTML response saying "CardConnect REST Servlet", then our credentials are correct.
Debug.Print "response status code = " & resp.StatusCode

Debug.Print "response string:"
Debug.Print resp.BodyStr

' Sample output:

' response status code = 200
' response string:
' <html lang="en"><body><h1>CardConnect REST Servlet</h1></body></html