Tcl

CardConnect Test API Credentials

To test and validate site-level credentials, you can make a GET request with no body to the base URL.

Chilkat Tcl Downloads

Tcl


load ./chilkat.dll

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

# The CardConnect REST Web Service base URL includes a protocol, host, port and servlet specification.
# 
# For example:
# https://<site>.cardconnect.com:<port>/cardconnect/rest/
# 
# This represents an HTTPS request to the REST web service base URL. 
# The servlet name is fixed within the application; the host and port are assigned by CardConnect. 

set http [new_CkHttp]

CkHttp_put_BasicAuth $http 1
CkHttp_put_Login $http "API_USERNAME"
CkHttp_put_Password $http "API_PASSWORD"

set url "https://<site>.cardconnect.com:<port>/cardconnect/rest/"
set responseStr [CkHttp_quickGetStr $http $url]

if {[CkHttp_get_LastMethodSuccess $http] == 0} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    exit
}

# If we get a 200 response status and an HTML response saying "CardConnect REST Servlet", then our credentials are correct.
puts "response status code = [CkHttp_get_LastStatus $http]"

puts "response string:"
puts "$responseStr"

# Sample output:

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

delete_CkHttp $http