(Excel) HTTPS Requests over Squid Proxy Direct TLS Connection

Demonstrates how to send HTTP requests through an HTTP proxy that supports Direct TLS Connections. (Chilkat tests with a squid 4.11 proxy.)

A direct TLS connection to an HTTP proxy is where the initial connection to the proxy server is TLS.

Note: This example requires Chilkat v9.5.0.83 or greater.

For more information, see https://wiki.squid-cache.org/Features/HTTPS#Direct_TLS_connection

Download Excel Class Modules Chilkat Excel Class Modules

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

Dim http As Chilkat.Http
Set http = Chilkat.NewHttp

' Set the HTTP proxy domain or IP address.
http.ProxyDomain = "172.16.16.46"
' The proxy port..
http.ProxyPort = 3128

' Indicate that we are to use a direct TLS connection with the HTTP proxy
' (we use a Squid Cache: Version 4.11 for testing)
http.ProxyDirectTls = True

' If the proxy requires a login or password, we can set it here.
' Otherwise comment out these lines.
http.ProxyLogin = "myProxyLogin"
http.ProxyPassword = "myProxyPassword"

' All requests sent on the http object will now go through the proxy.
' Give it a test:

s = http.QuickGetStr("https://www.chilkatsoft.com/helloWorld.html")
If (http.LastMethodSuccess = False) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

' The LastErrorText property also contains information when method call succeeds.
' Have a look to see that the request was sent through the proxy:
Debug.Print http.LastErrorText

Debug.Print "---"
Debug.Print s
Debug.Print "---"
Debug.Print "Success for TLS destination over direct TLS HTTP proxy."