|
|
OMP
is a
COM component that will parse the structured storage file
(.MSG) of a
Microsoft Outlook 2000, XP, 2003, 2005, 2007 email message file.
This COM DLL does NOT require
Outlook, or CDO to function. The DLL provides support to
return the SMTP header, subject, and both HTML and text
message bodies from the file. Fully supports
Visual Basic, REALbasic, Visual C++, and any other
modern PC development environment that support COM.
Online support available through the
message board.
There is also a Java based .MSG parser available, contact sales for more information.
- Full SMTP Header
- To
- From
- CC
- Subject
- Message body as plain text
- Message body as HTML
- Attachments (List)
- Attachments Data As:
Binary Stream
IStream
Stream Name
- Date Message Created
- Date Message Sent
- Message GUID
- Other message properties can be added on a fee basis.
(note: the demo contains a dumbed down version of component)
Download Demo
Sample usage
using Visual Basic and REALbasic:
' Component Use, Visual Basic Example
Dim strFileName As String
txtHeader.Text = ""
txtSubject.Text = ""
txtTextBody.Text = ""
txtHTMLBody.Text = ""
strFileName = File1.Path & "\" & File1.FileName
Dim omp As New OutlookMsgParser.clsMsgParser
' <snip, copy protection code removed, you'd call this here....>
omp.XP2003 = chkUseXP2003.Value ' this is true if > Outlook 2000
omp.OpenStorage strFileName
txtHeader.Text = omp.SMTPHeader
txtSubject.Text = omp.Subject
txtTextBody.Text = omp.TextBody
txtHTMLBody.Text = omp.HTMLBody
txtToo.Text = omp.Too
txtFromm.Text = omp.Fromm
txtDatee.Text = omp.Datee
txtAttachments.Text = omp.Attachments
txtSubmitted.Text = omp.ClientSubmitTime
txtCreated.Text = omp.CreationTime
txtStatus.Text = "Processed " + omp.Subject
Set omp = Nothing
//
Component Use, REALbasic Example
dim obj as oleobject
dim v as variant
dim strIn(1) as variant
obj = new oleObject("OutlookMsgParser.clsMsgParser", true)
// <snip, copy protection code removed, you'd call this here....>
strIn(1) = "C:\MyProjects\rbOMPSupport\testoneattachment.msg"
v = obj.invoke("OpenStorage", strIn)
v = obj.property("SMTPHeader")
editField1.text = v
v = obj.property("Subject")
ListBox1.AddRow v
v = obj.property("TextBody")
ListBox1.AddRow v
v = obj.property("HTMLBody")
ListBox1.AddRow v
v = obj.property("Attachments")
ListBox1.AddRow v
obj = Nil
exception err as oleexception
msgbox err.message
REALbasic
outlook file parser outlook message parser outlook
structure storage parser view viewer outlook message file
outlook 2000 outlook xp outlook 2003 message parser
visual basic outlook message parser |
