Visual Basic Examples

ChilkatHOMEAndroid™ASPVisual BasicVB.NETC#iOS (IPhone)Objective-CC++CUnicode C++Unicode CMFCDelphi DLLDelphi ActiveXFoxProJavaPerlPHP ExtensionPHP ActiveXPythonPowerShellRubySQL ServerVBScript

VB Examples

Bounced Mail
Bz2
Character Encoding
CSV
Digital Certificates
Digital Signatures
Email
FTP
HTML Conversion
HTTP
IMAP
Encryption
MHT / HTML Email
POP3
RSA
S/MIME
SFTP
SMTP
Socket
Spider
SSH
SSH Key
SSH Tunnel
String
Tar
Upload
XML
XMP
Zip Compression

More Examples...
Amazon S3
Email Object
DKIM / DomainKey
NTLM
DH Key Exchange
DSA
FileAccess
RSS
Atom
Self-Extractor
Service
Bzip2
PPMD
Deflate
LZW


VB Strings
VB Byte Array

 

 

 

 

 

 

 

Access Attached Message (Embedded Email)

Download Chilkat Email ActiveX

How to access an email embedded within another email (i.e. an attached message).

Dim email As New ChilkatEmail2

'  Load an email from a .eml
Dim success As Long
success = email.LoadEml("embeddedEmail.eml")
If (success <> 1) Then
    MsgBox email.LastErrorText
    Exit Sub
End If

'  Display how many attached emails are embedded within
'  this one:
Dim numAttached As Long
numAttached = email.NumAttachedMessages
MsgBox numAttached

'  Get the 1st attached message.
Dim email2 As ChilkatEmail2
Set email2 = email.GetAttachedMessage(0)
If (Not (email2 Is Nothing )) Then

    '  Display the subject, From, and a header field...
    Text1.Text = Text1.Text & email2.Subject & vbCrLf
    Text1.Text = Text1.Text & email2.From & vbCrLf
    Text1.Text = Text1.Text & email2.GetHeaderField("X-SOMETHING") & vbCrLf
End If


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