(Visual FoxPro) SMTP Inspection

See more SMTP Examples

Examine an SMTP session to view all communications sent to the SMTP server.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

LOCAL lnSuccess
LOCAL loMailman
LOCAL loEmail
LOCAL lcMimeStr

lnSuccess = 0

loMailman = CreateObject('Chilkat.MailMan')

loMailman.SmtpHost = "smtp.example.com"
loMailman.SmtpUsername = "myUsername"
loMailman.SmtpPassword = "myPassword"

loMailman.SmtpPort = 465
loMailman.StartTLS = 1

loEmail = CreateObject('Chilkat.Email')

loEmail.Subject = "This is a test"
loEmail.Body = "This is a test"
loEmail.From = "Alex <alex@example.com>"
loEmail.AddTo("Christoph","christoph@example2.com")
loEmail.AddBcc("Victor","victor@example3.com")

* Generate the MIME that is sent when SendEmail is called
lcMimeStr = loMailman.RenderToMime(loEmail)
? lcMimeStr

lnSuccess = loMailman.SendEmail(loEmail)
IF (lnSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    RELEASE loEmail
    CANCEL
ENDIF

lnSuccess = loMailman.CloseSmtpConnection()
IF (lnSuccess <> 1) THEN
    ? "Connection to SMTP server not closed cleanly."
ENDIF

* Examine the SMTP session log.
? "----"
? "Smtp Session Log:"
? loMailman.SmtpSessionLog

* ---------------------------------------------------
* Sample output:
* ---------------------------------------------------

* MIME-Version: 1.0
* Date: Fri, 06 Mar 2026 16:21:00 -0600
* Message-ID: <A5DC25990C93EC2676F4FBB2BB3BFA9EB34FF9D3@CHILKAT25>
* Content-Type: text/plain; charset=us-ascii; format=flowed
* Content-Transfer-Encoding: 7bit
* X-Priority: 3 (Normal)
* Subject: This is a test
* From: Alex <alex@example.com>
* To: Christoph <christoph@example2.com>
* Bcc: Victor <victor@example3.com>
* 
* This is a test
* ----
* Smtp Session Log:
* 220 smtp.example.com ESMTP Amazon WorkMail SMTP Service
* EHLO MYCOMPUTER<CRLF>
* 250-smtp.example.com
* 250-8BITMIME
* 250-AUTH PLAIN LOGIN
* 250 Ok
* AUTH LOGIN<CRLF>
* 334 VXNlcm5hbWU6
* YWRtaW5AY2hpbGthdHNvZnQuY29t<CRLF>
* 334 UGFzc3dvcmQ6
* {PasswordOrCredentials}
* 235 Authentication successful.
* MAIL FROM:<alex@example.com><CRLF>
* 250 Ok
* RCPT TO:<christoph@example2.com><CRLF>
* 250 Ok
* RCPT TO:<victor@example3.com><CRLF>
* 250 Ok
* DATA<CRLF>
* 354 End data with <CR><LF>.<CR><LF>
* {388 bytes} <--- The MIME source of the email (examined via RenderToMime) was sent here.
* <CRLF>.<CRLF>
* 250 Ok
* QUIT<CRLF>
* 221 Bye

RELEASE loMailman
RELEASE loEmail