SMTP 邮件（1）

巷中人

于 2010-10-19 17:11:00 发布

阅读量322

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/noevil/archive/2010/10/19/1855686.html

连接服务器和发送邮件。

  Form1.IdSMTP1.Username := 'xxx@163.com'; { 服务器上的用户名 }
  Form1.IdSMTP1.Password := 'xxx'; { 服务器上的密码 }
  Form1.IdSMTP1.Host := 'smtp.163.com'; { 服务器SMTP地址 }
  Form1.IdSMTP1.Port := 25; { 服务器端口 }
  Form1.IdSMTP1.Connect; { 建立连接 }

  Form1.IdMessage1.Subject := 'Title'; { 邮件标题 }
  Form1.IdMessage1.Body.Add('Body'); { 邮件正文件内容 }
  Form1.IdMessage1.From.address := 'xxx@163.com'; { 发件人地址 }
  Form1.IdMessage1.Recipients.EMailAddresses := 'inoevil@qq.com'; { 收件人地址，这里改为你的EMAIL地址 }
  Form1.IdMessage1.Priority := mphigh; { 优先级，mphigh为最高级。 }
  Form1.IdSMTP1.Send(Form1.IdMessage1); { 发送邮件 }

转载于:https://www.cnblogs.com/noevil/archive/2010/10/19/1855686.html