HTTP Negotiate/ Kerberos Authentication

To use Kerberos HTTP authentication, simply set the Login, Password, LoginDomain, and NegotiateAuth properties prior to calling any HTTP method (such as Download, QuickGetStr, SynchronousRequest, etc.)

Download Chilkat HTTP ActiveX

LOCAL loHttp
LOCAL lnSuccess

loHttp = CreateObject('Chilkat.Http')

*  Any string unlocks the component for the 1st 30-days.
lnSuccess = loHttp.UnlockComponent("Anything for 30-day trial")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loHttp.LastErrorText)
    QUIT
ENDIF

*  Set the login/password for HTTP NTLM Authentication:
loHttp.Login = "myLogin"
loHttp.Password = "myPassword"
loHttp.LoginDomain = "myLoginDomain"
*  Negotiate authentication allows the HTTP client
*  to dynamically select either Kerberos or NTLM, depending
*  on what the server supports.
loHttp.NegotiateAuth = 1

*  Download a .zip from chilkatsoft.com:
*  PS> This download URL doesn't actually require
*  authentication.  You'll want to replace this URL with your own.
lnSuccess = loHttp.Download("http://www.chilkatsoft.com/preRelease/ChilkatDotNet2.zip","ChilkatDotNet2.zip")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loHttp.LastErrorText)
ELSE
    =MESSAGEBOX("Download Complete!")
ENDIF