用PB编写邮件应用程序（1）

　　由于受到强大数据库功能的掩盖，PB的邮件功能鲜为人知。在VB中可以轻松地利用CDO控件发邮件（Delphi中用NMSMTP），而PB中的邮件函数比它们更灵活、方便。

　　PB以其独特高效的数据库访问技术，赢得了广大程序员的青睐。从表面上看，它似乎只适合于开发数据库应用程序，而事实上，PB遵照信报接口MAPI的标准，开发了许多内部函数和数据结构，用于对电子邮件提供支持，因此也是一个相当不错的邮件应用程序开发工具。

　　一个邮件应用程序要处理的基本事务主要包括：登录到邮件服务器开始会话、接发邮件、结束邮件会话。在PB中，所有这些事务都围绕mailSession对象来展开，因此，编程时，需要在主窗口中定义一个该类型的实例变量：
　　mailSession MyMail
　　然后在Open事件中将其初始化：
　　MyMail=Create mailSession

1．登录到邮件服务器

　　MyMail经过初始化以后，还要用mailLogon命令将其连接到一个邮件服务器：

　　MyMail.mailLogon(′jq75′,′alexander′,mailNewSessionWithDownLoad!)

　　
　　前两个参数分别为用户名和口令，若被忽略，运行时就会出现一个注册对话框。最后一个参数表示新建一个邮件会话，并将服务器上属于jq75的邮件下载到他的收件箱中。

图1