Visual FoxPro

IMAP using HTTP Proxy

Demonstrates how to connect to an IMAP server through an HTTP proxy. Visual FoxPro

LOCAL lnSuccess
LOCAL loImap

lnSuccess = 0

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

loImap = CreateObject('Chilkat.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.
loImap.HttpProxyHostname = "www.myhttpproxy.com"
loImap.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
loImap.Ssl = 1
loImap.Port = 993
lnSuccess = loImap.Connect("imap.example.com")
IF (lnSuccess <> 1) THEN
    ? loImap.LastErrorText
    RELEASE loImap
    CANCEL
ENDIF

* ...
* ..

RELEASE loImap