PowerBuilder

Get a MIME Header Field Value

Demonstrates the Chilkat Mime.GetHeaderField method, which returns the value of the first header field whose name matches case-insensitively. The only argument is the field name; it returns null when no matching field exists.

Note: The file path is relative to the application's current working directory. Absolute paths may also be used. Supply the path to your own file.

Background: This is the everyday way to read a header value — the Subject, a Message-ID, a custom X- header. Because a missing field returns null, the returned value is assigned to a variable and checked rather than used directly, so an absent header is handled cleanly instead of surfacing as an error later. Only the first matching occurrence is returned; iterate by index to see duplicates.

Chilkat PowerBuilder Downloads

Download Chilkat for PowerBuilder

PowerBuilder

integer li_rc
long li_Success
oleobject loo_Mime
string ls_Subject

li_Success = 0

loo_Mime = create oleobject
li_rc = loo_Mime.ConnectToNewObject("Chilkat.Mime")
if li_rc < 0 then
    destroy loo_Mime
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_Mime.LoadMimeFile("qa_data/message.eml")
if li_Success = 0 then
    Write-Debug loo_Mime.LastErrorText
    destroy loo_Mime
    return
end if

//  Return the value of the first header field with a matching (case-insensitive) name.
//  GetHeaderField returns null when no matching field exists, so assign it to a string variable
//  and check for success.
ls_Subject = loo_Mime.GetHeaderField("Subject")
if loo_Mime.LastMethodSuccess = 0 then
    Write-Debug loo_Mime.LastErrorText
    destroy loo_Mime
    return
end if

Write-Debug "Subject: " + ls_Subject


destroy loo_Mime