B4X

IMAP using HTTP Proxy

Demonstrates how to connect to an IMAP server through an HTTP proxy. B4X

Dim success As Boolean = False

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

Dim imap As ChilkatImap
imap.Initialize("imap")

'  To connect through an HTTP proxy, set the HttpProxyHostname
'  and HttpProxyPort properties to the hostname (or IP address)
'  and port of the HTTP proxy.  Typical port numbers used by
'  HTTP proxy servers are 3128 and 8080.
imap.HttpProxyHostname = "www.myhttpproxy.com"
imap.HttpProxyPort = 3128

'  Important:  Your HTTP proxy server must allow non-HTTP
'  traffic to pass.  Otherwise this does not work.

'  Connect to an IMAP server through the HTTP proxy.
'  Use TLS
imap.Ssl = True
imap.Port = 993
success = imap.Connect("imap.example.com")
If success <> True Then
    Log(imap.LastErrorText)
    Return
End If


'  ...
'  ...