<b>用C++BUILDER实现POP3电子邮件的接纳</b>[VC/C++编程]

通过对C＋＋BUILDER的组件设置,我们可以成立一个自己的POP3电子邮件接纳程序.

1、成立一个工程文件

2、成立一个新的表单,设置它的caption属性为Getmail,在上面安排一个TpageControl控件,单击右键成立三个TabSheet(1,2,3).在TabSheet1上安排四个Edit(1,2,3,4)控件并排除它们的Text属性及两个Botton(1,2),此中Edit1用以输入POP3服务器的名称;Edit2用以设置拜候端口号,我们设置它为110,并将它的Text属性设为110;Edit3用以输入用户名;Edit4用以输进口令.设Botton1的caption为“衔接”,Botton2的caption为“断开衔接”.在TabSheet2上安排五个Edit(5,6,7,8,9)控件、两个Memo控件和三个Botton(3,4,5),Edit5用来显示邮件的编号;Edit6、Edit7、Edit8和Edit9辨别用来显示邮件的发送者、邮件的主题、大小及ID号;Memo1用来显示邮件的正文;Memo2用来显示邮件头;Botton3、Botton4、Botton5的caption属性辨别设置为“删除”、“邮件”和“邮件信息”.在TabSheet3上安排两个Botton和一个Memo控件,此中Botton6的caption属性为“邮件列表”;Botton7的caption为“排除列表”;Memo的用处自然为显示邮件列表.在表单的底部安排一个StatusBar控件用以显示工作状况.最后,最重要的是在表单上安排一个NMPOP3控件,在这个程序里,它是我们与POP3服务器通讯的核心.

3、编写代码

为Botton1的OnClick事件编写代码:

NMPOP31－〉AttachFilePath = ″.″;　//设定邮件的存储目录

NMPOP31－〉DeleteOnRead = false;　　//读完邮件后能否删除

NMPOP31－〉ReportLevel = Status_Basic; //掌握OnStatus事件和Status属性报告的资料的数目

NMPOP31－〉TimeOut = 20000;　　　　　//设置超时的时间

NMPOP31－〉Host = Edit1－〉Text;　　//设置pop3服务器的主机名

NMPOP31－〉Port = StrToInt(Edit2－〉Text); //设置pop3服务器的端口号

NMPOP31－〉UserID = Edit3－〉Text;　 //获得用户名

NMPOP31－〉Password = Edit4－〉Text; //得到口令

NMPOP31－〉Connect(); //开始衔接

Label10－〉Caption = ″＃ of Messages: ″＋IntToStr(NMPOP31－〉MailCount); //显示邮件的数目

为Botton2的OnClick事件编写代码:

NMPOP31－〉Disconnect();　//使之可以与服务器断开衔接

为Botton3的OnClick事件编写代码,当点击它时可以删除邮件:

NMPOP31－〉DeleteMailMessage(StrToInt(Edit5－〉Text));

为Botton4的OnClick事件编写代码,当点击它时显示整个邮件:

NMPOP31－〉GetMailMessage(StrToInt(Edit5－〉Text));

Edit6－〉Text = NMPOP31－〉MailMessage－〉From; //通过MailMessage的From属性得到发信人

Edit7－〉Text = NMPOP31－〉MailMessage－〉Subject; //通过MailMessage的Subjecet属性得到主题

Edit9－〉Text = NMPOP31－〉MailMessage－〉MessageId; //通过MailMessage的MessageIds属性得到Id

Memo2－〉Lines－〉Assign(NMPOP31－〉MailMessage－〉Head);

Memo1－〉Lines－〉Assign(NMPOP31－〉MailMessage－〉Body);

if (NMPOP31－〉MailMessage－〉Attachments－〉Text != ″″)

ShowMessage(″Attachments:\n″＋NMPOP31－〉MailMessage－〉Attachments－〉Text);

为Botton5的OnClick事件编写代码,点击它时将在Memo中显示邮件的概要信息:

NMPOP31－〉GetSummary(StrToInt(Edit5－〉Text));

Edit6－〉Text = NMPOP31－〉Summary－〉From;

Edit7－〉Text = NMPOP31－〉Summary－〉Subject;

Edit8－〉Text = IntToStr(NMPOP31－〉Summary－〉Bytes);

Edit9－〉Text = NMPOP31－〉Summary－〉MessageId;

为Botton6的OnClick事件编写代码,点击它时将在Memo3中显示邮件列表:

NMPOP31－〉List(); //得到邮件的数目和大小的列表

为Botton7的OnClick事件编写代码,点击它时将排除Memo3中的邮件列表:

Memo3－〉Clear();

　　以上是“<b>用C++BUILDER实现POP3电子邮件的接纳</b>[VC/C++编程]”的内容，如果你对以上该文章内容感兴趣，你可以看看七道奇为您推荐以下文章：