(Excel) Connecting to GMAIL using IMAP

Demonstrates how to connect to GMAIL using IMAP.

Download Excel Class Modules Chilkat Excel Class Modules

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

Dim imap As Chilkat.Imap
Set imap = Chilkat.NewImap

' Turn on session logging:
imap.KeepSessionLog = True

' Connect to GMail
' Use TLS
imap.Ssl = True
imap.Port = 993

success = imap.Connect("imap.gmail.com")
If (success <> True) Then
    Debug.Print imap.LastErrorText
    Exit Sub
End If

' Login
' Your login is typically your GMail email address.
success = imap.Login("username@gmail.com","myPassword")
If (success <> True) Then
    Debug.Print imap.LastErrorText
    Exit Sub
End If

' Select an IMAP mailbox
success = imap.SelectMailbox("Inbox")
If (success <> True) Then
    Debug.Print imap.LastErrorText
    Exit Sub
End If

' Show the session log.
Debug.Print imap.SessionLog

' Disconnect from the IMAP server.
success = imap.Disconnect()