Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Access Attached Message (Embedded Email)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 |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.