Chilkat Examples

ChilkatHOMEAndroid™Classic ASPCC++C#C# UWP/WinRTDataFlexDelphi ActiveXDelphi DLLVisual FoxProJavaLianjaMFCObjective-CPerlPHP ActiveXPHP ExtensionPowerBuilderPowerShellPureBasicPythonRubySQL ServerSwiftTclUnicode CUnicode C++Visual Basic 6.0VB.NETVB.NET UWP/WinRTVBScriptXojo PluginNode.js

Visual Basic 6.0 Examples

Async
Certificates
ECC
Email Object
Encryption
FTP
HTML-to-XML/Text
Gzip
HTTP
IMAP
JSON
MHT / HTML Email
PEM
PFX/P12
Java KeyStore (JKS)
POP3
RSA Encryption
MIME
REST
SCP
SMTP
Socket/SSL/TLS
SSH Key
SSH
SFTP
Stream
Tar Archive
XML
XMP
Zip

More Examples...
Google APIs
Google Cloud Storage
Azure Cloud Storage
Amazon S3 (new)
Google Drive
ASN.1
PRNG
Amazon S3
Bounced Email
CSV
Diffie-Hellman
DKIM / DomainKey
DSA
NTLM
QuickBooks

 

 

 

 

 

 

 

(Visual Basic 6.0) POP3 using HTTP Proxy

Demonstrates how to communicate with a POP3 server through an HTTP proxy.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

'  The mailman object is used for receiving (POP3)
'  and sending (SMTP) email.
Dim mailman As New ChilkatMailMan

'  Any string argument automatically begins the 30-day trial.
Dim success As Long
success = mailman.UnlockComponent("30-day trial")
If (success <> 1) Then
    Text1.Text = Text1.Text & "Component unlock failed" & vbCrLf
    Exit Sub
End If

'  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.
mailman.HttpProxyHostname = "www.my-http-proxy.com"
mailman.HttpProxyPort = 3128

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

'  Set the POP3 server's hostname
mailman.MailHost = "pop.someMailServer.com"

'  Set the POP3 login/password.
mailman.PopUsername = "myLogin"
mailman.PopPassword = "myPassword"

Dim bundle As ChilkatEmailBundle
'  Copy the all email from the user's POP3 mailbox
'  into a bundle object.  The email remains on the server.
' 
'  NOTE: All methods that communicate with a POP3 server
'  will automatically connect and authenticate (i.e. login)
'  if not already connected.  The connection will remain
'  open after the method call returns so that subsequent
'  calls do not need to re-establish the connection.
'  In this case, the connection is established via the HTTP
'  proxy.
Set bundle = mailman.CopyMail()

If (bundle Is Nothing ) Then
    Text1.Text = Text1.Text & mailman.LastErrorText & vbCrLf
    Exit Sub
End If

Dim i As Long
Dim email As ChilkatEmail
For i = 0 To bundle.MessageCount - 1
    Set email = bundle.GetEmail(i)
    Text1.Text = Text1.Text & "From: " & email.From & vbCrLf
    Text1.Text = Text1.Text & "Subject: " & email.Subject & vbCrLf

Next

success = mailman.Pop3EndSession()

 

© 2000-2016 Chilkat Software, Inc. All Rights Reserved.