Visual FoxPro

HTTPS Windows Integrated Authentication

See more HTTP Examples

This example pertains to running on the Windows operating system only.

It provides guidance on how to send HTTP requests using the current logged-on Windows user credentials. This is where NTLM/Negotiate authentication is used, but the login/password credentials are not explicitly provided by the application, but are implicitly provided based on the Windows logged-on user (i.e. the Windows account for the running process).

Visual FoxPro

LOCAL loHttp
LOCAL lcResponseStr

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

loHttp = CreateObject('Chilkat.Http')

* Chilkat implements the NTLM protocol directly, which is how it can be used on non-Windows systems.
* However, Chilkat can also optionally use Microsoft's SSPI (see https://docs.microsoft.com/en-us/windows/desktop/secauthn/ssp-packages-provided-by-microsoft) 
* to allow for Windows Integrated Authentication.

* Setting the HTTP Login equal to the empty string, and the Password equal to the keyword "default"
* will cause Chilkat to use the Microsoft SSPI w/ integrated authentication.
loHttp.Login = ""
loHttp.Password = "default"

* We can also explicitly indicate that NTLM or Negotiate authentication is to be used:
loHttp.NegotiateAuth = 1

* Set various properties unrelated to authentication..
* Automatically follow redirects.
loHttp.FollowRedirects = 1
* Give verbose logging in the LastErrorText (in case there are errors)
loHttp.VerboseLogging = 1
* Optionally log the exact session to a file (for debugging)
loHttp.SessionLogFilename = "c:/someDir/session.txt"
* Perhaps you wish to be seen as a browser on Mac OS X..
loHttp.UserAgent = "Mozilla/5.0 (Windows NT; Windows NT 6.1; en-GB) AppleWebKit/534.6 (KHTML, like Gecko) Chrome/7.0.500.0 Safari/534.6"

* Note: If the result of authentication is to set Cookies that are used in subsequent requests,
* then make sure Chilkat both saves and sends cookies: 
loHttp.SaveCookies = 1
loHttp.SendCookies = 1
loHttp.CookieDir = "memory"

* Send a GET request to a URL, using Windows Integrated Authentication...
lcResponseStr = loHttp.QuickGetStr("https://somewhere.net/api/user")
IF (loHttp.LastMethodSuccess <> 1) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    CANCEL
ENDIF

? "response status code = " + STR(loHttp.LastStatus)
? "response header:"
? loHttp.LastHeader
? "----"
? lcResponseStr

RELEASE loHttp