C++Builder2010发邮件例子

  • k5_698106
    了解作者
  • 10.3KB
    文件大小
  • rar
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 0
    下载次数
  • 2022-04-13 08:55
    上传日期
C++Builder2010发邮件例子,用了TIdMessage和TIdSMTP控件,源码测试通过!
SendEmail.rar
  • SendEmail
  • Debug
  • __history
  • SendEmail.cpp.~1~
    873B
  • Mainfrm_Unit.dfm.~1~
    3.7KB
  • SendEmail.res
    5.2KB
  • Mainfrm_Unit.h
    1.6KB
  • Mainfrm_Unit.cpp
    5.7KB
  • SendEmail.cbproj.local
    1KB
  • SendEmail.cbproj
    9.3KB
  • Mainfrm_Unit.dfm
    3.7KB
  • SendEmail.cpp
    877B
内容介绍
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Mainfrm_Unit.h" #include "IdAttachmentFile.hpp" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "IdBaseComponent" #pragma link "IdComponent" #pragma link "IdExplicitTLSClientServerBase" #pragma link "IdMessageClient" #pragma link "IdSMTP" #pragma link "IdSMTPBase" #pragma link "IdTCPClient" #pragma link "IdTCPConnection" #pragma link "IdIOHandler" #pragma link "IdIOHandlerSocket" #pragma link "IdIOHandlerStack" #pragma link "IdSSL" #pragma link "IdSSLOpenSSL" #pragma link "IdMessage" #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::btn1Click(TObject *Sender) { // IdMessage1->CharSet = "gb2312"; IdMessage1->Recipients->EMailAddresses = edtDest->Text; //邮件接收者的信箱 IdMessage1->From->Text = edtSource->Text; //邮件发送者的信箱 IdMessage1->Subject = edtTitle->Text; //邮件的标题 IdMessage1->Body->Add(mmoMsg->Text);//邮件内容 //IdMessage1->CCList->EMailAddresses = "gzxsg@126.com"; //邮件的抄送地址 IdMessage1->MessageParts->Clear(); IdMessage1->MessageParts->Add(); UnicodeString AttFile = edtAttchment->Text;//"d:\\单页属性表.dotx";//附件文件名 TIdAttachmentFile *idAtta = new TIdAttachmentFile(IdMessage1->MessageParts,AttFile); IdSMTP1->Host = edtServer->Text; IdSMTP1->Port = edtServerPort->Text.ToIntDef(25); //IdSMTP1->AuthenticationType = atLogin; IdSMTP1->AuthType = satDefault; IdSMTP1->Username = edtUser->Text; IdSMTP1->Password = edtPassword->Text; try { IdSMTP1->Connect(); IdSMTP1->Authenticate(); IdSMTP1->Send(IdMessage1); Application->MessageBox(L"发送完成!",L"邮件系统",MB_ICONINFORMATION); } catch(Exception &e) { Application->MessageBox(e.Message.c_str(),L"邮件系统",MB_OK+MB_ICONWARNING); } IdSMTP1->Disconnect(); // IdMessage1->Recipients->EMailAddresses = "8368382@qq.com"; //邮件接收者的信箱 // IdMessage1->From->Text = "gzxsg@126.com"; //邮件发送者的信箱 // IdMessage1->Subject = "测试发送电子邮件"; //邮件的标题 // IdMessage1->Body->Add("利用C++Builder中的IdSMTP和IdMessage控件发送电子邮件");//邮件内容 // IdMessage1->CCList->EMailAddresses = "8368382@126.com"; //邮件的抄送地址 // IdMessage1->MessageParts->Clear(); // IdMessage1->MessageParts->Add(); // //AnsiString AttFile=" d:\\a.txt";//附件文件名 // //TIdAttachmentFile *idAtta=new TIdAttachmentFile(IdMessage1->MessageParts,AttFile); // IdSMTP1->Host = "smtp.126.com"; // IdSMTP1->Port = 25; // //IdSMTP1->AuthenticationType = atLogin; // IdSMTP1->AuthType = satDefault; // IdSMTP1->Username = "gzxsg"; // IdSMTP1->Password = "79780812"; // IdSMTP1->Connect(); // IdSMTP1->Authenticate(); // IdSMTP1->Send(IdMessage1); // IdSMTP1->Disconnect(); // IdSMTP1->Host = "smtp.126.com"; // IdSMTP1->Port = 25; // IdSMTP1->IOHandler = m_IdSSLIOHandlerSocketOpenSSL; // IdSMTP1->UseTLS = utNoTLSSupport; // // // IdSMTP1->Username = L"gzxsg"; // IdSMTP1->Password = L"79780812" ; // IdSMTP1->AuthType = satDefault; // IdSMTP1->Authenticate(); // // // IdMessage1->ContentType = "text/html"; // IdMessage1->Subject = "TEST"; // 邮件标题,只要是汉字, 就会报错 RangeCheck error,英没问题. C++ BUILDER 2010自带的indy // // IdMessage1->ReceiptRecipient->Address = L"8368382@qq.com"; // if (!IdSMTP1->Connected()) // { // try // { // // IdSMTP1->Connect(); // }catch(...) // { // Application->MessageBox(L"连接邮件服务器失败!", L"提示", MB_OK + MB_ICONINFORMATION); // return; // } // } // if (IdSMTP1->Connected()) // { // try // { // IdSMTP1->Send(IdMessage1); // } // catch(...) // { // Application->MessageBox(L"发送邮件失败!", L"提示", MB_OK + MB_ICONWARNING); // return; // } // } // // Application->MessageBox(L"邮件发送成功!", L"提示", MB_OK + MB_ICONINFORMATION); // int recnum, k; AnsiString addr; //  IdSMTP1->Host = ComboBoxaddr->Text.Trim ();//设定SMTP服务器地址和端口号 //  IdSMTP1->Port =25; //  if(CheckBox_AUTH->Checked ==true) //判断并设置SMTP服务器是否需要认证 //  { // IdSMTP1->Authentication Type = at Login; //   IdSMTP1->UserId = Edit name->Text. Trim (); //   IdSMTP1->Password=MaskEdit_pass->Text. Trim (); // } // //  IdMessage1->Content Type = "text/html"; //根据用户填写的信息创建邮件 //  IdMessage1->Subject =Edit3->Text.Trim (); //  ADOTable1->First(); //循环读取邮件地址并发送实现群发 //  Recnum= ADOTable1->Record Count; //  for (k=0;k<=recnum-1; k++) //  { //   Addr=Trim (ADOTable1->Field Byname ("Email")->AsString); //   IdMessage1->Recipients->Email Addresses =addr; //   if (!IdSMTP1->Connected()) // { // try // { // IdSMTP1->Connect (); // } // } //    catch (Exception %26amp;e) //    { // Application->Message Box(e.Message, "连接SMTP服务器失败", MB_ICONWARNING); // } //    if (IdSMTP1->Connected ()) //    { //    try //    { // IdSMTP1->Send (IdMessage1); // } //    catch (Exception %26amp;e) //    { // Application->Message Box(e.Message, "发送失败", MB_ICONWARNING); } //    } //    ADOTable1->Next ();} //    Application->Message Box ("发送完成!","邮件系统",MB_OK); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormCreate(TObject *Sender) { // } //---------------------------------------------------------------------------
评论
    相关推荐
    • C++ Primer
      C++经典教程,其内容是C++大师Stanley B. Lippman丰富的实践经验和C++标准委员会原负责人Josée Lajoie对C++标准深入理解的完美结合,已经帮助全球无数程序员学会了C++。 对C++基本概念和技术全面而且权威的阐述,对...
    • c++课件
      c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件c++课件
    • C++ PRrimer
      本书是久负盛名的C++经典教程,其内容是C++大师Stanley B. Lippman丰富的实践经验和C++标准委员会原负责人Josée Lajoie对C++标准深入理解的完美结合,已经帮助全球无数程序员学会了C++。本版对前一版进行了彻底的...
    • C++
      C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++C++
    • C++ primer
      本文档具有C++ primer 以及 C++ primer 标准答案各一份,内容清晰充实!希望与热爱C++的学友们一起同舟共济,努力学习!
    • C++ primer
      本书是久负盛名的C++经典教程,其内容是C++大师Stanley B. Lippman丰富的实践经验和C++标准委员会原负责人Josée Lajoie对C++标准深入理解的完美结合,已经帮助全球无数程序员学会了C++。本版对前一版进行了彻底的...
    • c++yuyanbiancheng
      这是C和C++集成的编程环境!这是C和C++集成的编程环境!这是C和C++集成的编程环境!这是C和C++集成的编程环境!这是C和C++集成的编程环境!
    • effective C++
      有关C++编程方面的检验性介绍,对由C转向C++,和有C++编程基础的程序员有帮助,不过是英文版
    • C++ Primer
      这本处适合各个阶段的C++程序员,这本书可以帮助初学者快速入门,里面有最实用,最容易理解的代码;同时这也是有经验的C++程序员最好的一本参考手册
    • C++ Primer
      本书是久负盛名的C++经典教程引,其内容是C++大师Stanley B. Lippman丰富的实践经验和C++标准委员会原负责人Josée Lajoie对C++标准深入理解的完美结合,已经帮助全球无数程序员学会了C++