使用OLE在Delphi中检索Outlook“收件箱”和“已发送”文件夹

概述从Delphi中提取Outlook文件夹的最佳方法是什么？理想情况下,我想检索收件箱文件夹及其中的任何其他文件夹.我不要求电子邮件标题/消息纯粹是文件夹名称. 德尔福BDS 2006 有关Outlook的对象模型,请参见 here.下面显示收件箱中文件夹的名称： procedure TForm1.Button1Click(Sender: TObject);var Outlook, oName 从Delphi中提取Outlook文件夹的最佳方法是什么？理想情况下,我想检索收件箱文件夹及其中的任何其他文件夹.我不要求电子邮件标题/消息纯粹是文件夹名称.

德尔福BDS 2006

解决方法 有关Outlook的对象模型,请参见 here.下面显示收件箱中文件夹的名称：

procedure TForm1.button1Click(Sender: TObject);var  Outlook,onameSpace,InBox: oleVariant;  i: Integer;begin  try    Outlook := GetActiveoleObject('outlook.application');  except    Outlook := CreateoleObject('outlook.application');  end;  onameSpace := Outlook.Getnamespace('MAPI');  onameSpace.logon('','',False,False);   // not sure if this is necessary  InBox := onameSpace.GetDefaultFolder(olFolderInBox);  for i := 1 to InBox.Folders.Count do    ShowMessage(InBox.Folders[i].name);end;

总结

以上是内存溢出为你收集整理的使用OLE在Delphi中检索Outlook“收件箱”和“已发送”文件夹全部内容，希望文章能够帮你解决使用OLE在Delphi中检索Outlook“收件箱”和“已发送”文件夹所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。