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

set http = CreateObject("Chilkat.Http")

'  Any string unlocks the component for the 1st 30-days.
success = http.UnlockComponent("Anything for 30-day trial")
If (success <> 1) Then
    MsgBox http.LastErrorText
    WScript.Quit
End If

'  Set the login/password for HTTP NTLM Authentication:
http.Login = "myLogin"
http.Password = "myPassword"
http.LoginDomain = "myLoginDomain"
'  Negotiate authentication allows the HTTP client
'  to dynamically select either Kerberos or NTLM, depending
'  on what the server supports.
http.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.
success = http.Download("http://www.chilkatsoft.com/preRelease/ChilkatDotNet2.zip","ChilkatDotNet2.zip")
If (success <> 1) Then
    MsgBox http.LastErrorText
Else
    MsgBox "Download Complete!"
End If