メールのヘッダをエントリ一覧で取り出す TKMP.DLL Tips

TKMP.DLL プログラミングTips

メールのヘッダをエントリ一覧で取り出す

　メールデータのヘッダ情報をエントリの一覧として取り出すには、TKMP.Reader.MailReaderクラスのHeaderCollectionプロパティを使用し、取得したTKMP.Reader.Header.HeaderStringクラスから各情報を取り出します。
　TKMP.Reader.Header.HeaderStringクラスには、エントリの名称とデータが格納されています。また、日本語コードが含まれている場合は、その文字コードとデコード前の情報も格納されています。
　次のサンプルでは、ストリームとして与えられたメールデータから、エントリの名称と、デコードしたデータを一覧で表示しています。生データを表示するにはDataプロパティの替わりに、SourceDataプロパティを使用してください

C#.NET

//メールデータが格納されたストリームからヘッダーのエントリを一覧で表示する
public void ShowHeaderData(System.IO.Stream MailStream)
{
    //メールデータの解析クラスを作成します
    TKMP.Reader.MailReader reader = new TKMP.Reader.MailReader(MailStream , true);

    foreach(TKMP.Reader.Header.HeaderString headerdata in reader.HeaderCollection)
    {   
        //ヘッダの名称を取得
        string name = headerdata.Name;
        //ヘッダのデータを取得
        string data = headerdata.Data;

        System.Console.WriteLine(name + " : " + data); 
    }
}

VB.NET

'メールデータが格納されたストリームからヘッダーのエントリを一覧で表示する
Public Sub ShowHeaderData(ByVal MailStream As System.IO.Stream)
    'メールデータの解析クラスを作成します
    Dim reader As New TKMP.Reader.MailReader(MailStream, True)

    Dim headerdata As TKMP.Reader.Header.HeaderString
    For Each headerdata In reader.HeaderCollection
        'ヘッダの名称を取得
        Dim name As String = headerdata.Name
        'ヘッダのデータを取得
        Dim data As String = headerdata.Data

        System.Console.WriteLine((name + " : " + data))
    Next headerdata
End Sub

VB.NETのコードはC#.NETを元に「C#.NET to VB.NET Translator」によって作成したものです