Delphi 发送邮件通过Office Outlook

2024-04-08 20:05:17

Delphi 发送邮件通过Office Outlook

网上搜到的Delphi邮件发送系统，绝大多数是使用SMTP协议来发送。

但是事实上它们已经过时了，大多数邮件服务器已经屏蔽了Delphi Indy的邮件发送，从而导致Delphi发送不成功。

事实上，让Delphi通过Outlook.Application来发送邮件，也是非常方便的，而且没有那么多的限制。

以下是我目前使用的，我把它写成了个函数，使用的时候调用一下即可。

不过，使用的前提是，你得现在在本地Outlook上配置好一个账户。

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

procedure TForm1.SendOutlookMail(const Recipient,Title,Body,Attachment:string);

const

olMailItem = 0;

var

Outlook: OleVariant;

vMailItem: variant;

begin

try

Outlook := GetActiveOleObject("Outlook.Application");

except

Outlook := CreateOleObject("Outlook.Application");

end;

vMailItem := Outlook.CreateItem(olMailItem);

vMailItem.Recipients.Add(Recipient);

vMailItem.Subject := Title;

vMailItem.Body := Body;

if Attachment <>"" then vMailItem.Attachments.Add(Attachment);

vMailItem.Send;

VarClear(Outlook);

转载于:https://www.cnblogs.com/m0488/p/6609881.html

Delphi 发送邮件通过Office Outlook相关推荐

Microsoft Office Outlook——商业人士眼中的完美客户端
回顾MS Office 套装组件的历史,我们可以发现Outlook与我们常用的Word.PPT.Excel这些软件一样出现了在Office 97这个第一次集办公应用与网络技术于一体的套装软件之中.然而 ...
Office Outlook 2007连接Exchange 2007图示(POP3IMAP)
这是使用Office Outlook 2007连接Exchange 2007的设置过程.但这个连接也存在POP3和IMAP两种连接,至于两种连接的区别,请谷哥或者百度. 另注意:如果在外网一定记得映射 ...
无法启动baiMicrosoft Office Outlook。无法打开duOutlook窗口
无法启动baiMicrosoft Office Outlook.无法打开duOutlook窗口 office2019的目录默zhi认安装在 C:\Program Files\Microsoft Off ...
改动office outlook 2007默认文件夹的存放位置
office outlook 2007 数据文件默认的存放位置是C盘,因为经常动C盘,且时常用影子系统,所以里面的数据一天到晚会清空,导出不是个办法,所以想让它存到其他盘,但在帐号数据文件里只能看不 ...
[Office] Microsoft Office Outlook 2007/2010 设置邮件已读/未读快捷键
今天和大家介绍一个非常有用的快捷键,它就是: OutLook 2007/2010中标记邮件已读 Ctrl+Q 标记邮件未读 Ctrl+U 曾几何时,为了快速标记邮件为已读,我在2007中翻了很多帮助 ...
把Foxmail里的邮件导入到Office Outlook里
今天一同事说要把Foxmail里的邮件都导入到Office Outlook里,于是问题就来了. 从Foxmail导出的文件.eml格式的,直接是不能导入到Office Outlook里.于是上网找了一 ...
Win7 Office Outlook客户端报没有默认的邮件客户端，或当前客户端无法实现该邮件的请求。
** Win7 Office Outlook客户端报没有默认的邮件客户端,或当前客户端无法实现该邮件的请求. ** 我们可以打开开始>设置>程序>默认程序.往下拉,点击根据文件类型 ...
如何将windows xp系统下的outlook express6.0的邮件，帐号及通迅录导入Office Outlook xp/2003/2007中
如何将windows xp系统下的outlook express6.0的邮件,帐号及通迅录导入Office Outlook xp/2003/2007中 1.此帮助以Outlook express6.0 ...
docs邮箱服务器,连接到服务器时Microsoft Office Outlook - Skype for Business | Microsoft Docs...
登录 Skype for Business Online 时Microsoft Office Outlook连接到 Skype for Business Online 时出现问题" 2021 ...

最新文章

热门文章