Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VBScript) CardConnect Test API CredentialsTo test and validate site-level credentials, you can make a GET request with no body to the base URL.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) ' 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. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = CreateObject("Chilkat.Http") http.BasicAuth = 1 http.Login = "API_USERNAME" http.Password = "API_PASSWORD" url = "https://<site>.cardconnect.com:<port>/cardconnect/rest/" responseStr = http.QuickGetStr(url) If (http.LastMethodSuccess = 0) Then outFile.WriteLine(http.LastErrorText) WScript.Quit End If ' If we get a 200 response status and an HTML response saying "CardConnect REST Servlet", then our credentials are correct. outFile.WriteLine("response status code = " & http.LastStatus) outFile.WriteLine("response string:") outFile.WriteLine(responseStr) ' Sample output: ' response status code = 200 ' response string: ' <html lang="en"><body><h1>CardConnect REST Servlet</h1></body></html outFile.Close |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.