BCB制作简单邮件发送器
一、准备阶段:BCB编译环境,控件IdSMTP , IdMessage 。SMTP是登录邮箱和服务器的,Message则是记录发件人,收件人,邮件主题和邮件内容。
二、实施阶段:IdSMTP重要的几点:
SMTP->AuthType =satDefault ; //设置为默认
SMTP->Host = "smtp.126.com";
SMTP->Username = userName;
SMTP->Password = passWord;
SMTP->Port = 25;
服务器Host是发件人的邮箱服务器,Username是发件人邮箱,Password是发件人邮箱密码,Port是端口,一般默认为25.
IdMessage重要的几点:
Message->Recipients->EMailAddresses = receiveUser ;
Message->From->Text = sendUser;
Message->Subject = subject.Trim();
Message->Body->Add(body.Trim() );
Recipients即是收件人地址,From是发件人地址,Subject是邮件主题,Body是邮件内容。
三、以上都填写好了之后,就可以写连接服务器的代码了:
if (SMTP->Connected() )
{
SMTP->Disconnect(); //断开上次会话
}
SMTP->Connect() ; // 连接SMTP服务器
if ( SMTP->Authenticate() ) // 用户验证(是否登录成功)
{
SMTP->Send(Message); // 发送邮件
ShowMessage("发送成功!");
}
SMTP->Disconnect(); // 中断连接SMTP服务器
先要判断之前是否连接,断开之前的连接,重新连接属于你自己的邮箱服务器,此时需要判断是否连接成功,连接成功后调用SMTP的Send函数发送Message就行了!
四、此外POP3是用于接收邮件的,目前还没去探索它,先mark在这里,以后有机会再试试!以上都是比较关键的几点代码,其他控件的摆放和使用都可以自由发挥。
啊 、发现一个巨大的bug!!发不了中文邮件!!有没有高手帮忙解决下啊??? 郁闷死了啊~~~~~