メールボックスのメール数を確認する TKMP.DLL Tips

TKMP.DLL プログラミングTips

メールボックスのメール数を確認する

　メールボックス内のメール数を確認するために「～.Count」というようなプロパティは用意されていません。
　手順としては、TKMP.Net.PopClientクラスでサーバーへ接続後、MailDatasプロパティの配列の数を数えることになります。

C#.NET

//接続情報
string server = "mail.example.jp";
int port = 110;
string userid = "userid";
string pass = "pass";

//サーバへの接続用クラスを作成する
System.Net.IPAddress address = System.Net.Dns.GetHostByName(server).AddressList[0];
TKMP.Net.IPopLogon logon = new TKMP.Net.BasicPopLogon(userid , pass);
TKMP.Net.PopClient pop = new TKMP.Net.PopClient(logon , address , port);

//接続開始
if(!pop.Connect())
{
    System.Windows.Forms.MessageBox.Show("接続失敗");
    return ;
}

//着信件数の読み出し
int mailcount = pop.MailDatas.Length;
System.Windows.Forms.MessageBox.Show("着信メールは " + mailcount.ToString() + " 件です");

//切断
pop.Close();

VB.NET

'接続情報
Dim server As String = "mail.example.jp"
Dim port As Integer = 110
Dim userid As String = "userid"
Dim pass As String = "pass"

'サーバへの接続用クラスを作成する
Dim address As System.Net.IPAddress = System.Net.Dns.GetHostByName(server).AddressList(0)
Dim logon As New TKMP.Net.BasicPopLogon(userid, pass)
Dim pop As New TKMP.Net.PopClient(logon, address, port)

'接続開始
If Not pop.Connect() Then
   System.Windows.Forms.MessageBox.Show("接続失敗")
   Return
End If

'着信件数の読み出し
Dim mailcount As Integer = pop.MailDatas.Length
System.Windows.Forms.MessageBox.Show(("着信メールは " + mailcount.ToString() + " 件です"))

'切断
pop.Close()

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