MyException - 我的异常网
当前位置:我的异常网» Delphi » 怎样通过Delphi调用Outlook发送任务、会议、约会解

怎样通过Delphi调用Outlook发送任务、会议、约会解决方法

www.MyException.Cn  网友分享于:2013-02-15  浏览:59次
怎样通过Delphi调用Outlook发送任务、会议、约会
怎样通过Delphi来调用Outlook发送任务、会议、约会?

------解决方案--------------------
发邮件的。。。其他的应该和这个差不多吧,没有用过outlook 呵呵
procedure SendOutlookMail;
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( 'dummy@hotmail.com ');
vMailItem.Subject := 'test email ';
vMailItem.Body := 'This is a test ';
vMailItem.Attachments.Add( 'C:\temp\sample.txt ');
vMailItem.Send;

VarClear(Outlook);
end;

------解决方案--------------------
看看这篇文章虽然不是delphi的希望对你有帮助

http://www.microsoft.com/china/MSDN/library/archives/library/dndotnetout2k2/html/odc_oldevsol.asp
------解决方案--------------------
Outlook的Automation对象编程方法

东北大学 张春明 姜绍飞 张春丽

--------------------------------------------


Microsoft Outlook是可编程桌面信息管理程序。由于Microsoft Outlook本身不包含Visual Basic for Applications,但包括完整的类型库(type library)和Visual Basic scrīpting Edition (VBscrīpt),因此,Outlook对象编程可以采用两种方法:即VBscrīpt脚本编程方法和Automation自动化编程方法。
VBscrīpt脚本编程方法一般用于设计基于Outlook的本地化解决方案;而Automation(或OLE Automation)自动化编程方法则是用于建立用户自己的群件或邮件系统。可以使用早期绑定或后期绑定来开始一个Automation过程。本文将以后期绑定为例介绍在Delphi 5编程环境下,Outlook的Automation对象编程方法。
Outlook对象模型
Outlook基于Microsoft Exchange消息系统,更具体地说是基于MAPI(Messaging Application Programming Interface)来存储数据。若将Outlook安装到一台没有其他任何消息组件的计算机中,则安装程序会自动安装基于MAPI的Microsoft Exchange消息系统。
与任何一种消息系统一样,Microsoft Exchange使用一个层次化的文件夹(Folder)集合来存储数据。文件夹可以包含子文件夹(如收件箱、发件箱等)和条目(Item)(如邮件消息、约会、联系人和任务等)。正是由于这种不确定性,使Outlook编程与以文档为中心的其他Office产品编程相比更具挑战性,是所有Microsoft Office程序中对象编程最复杂的一种。Automation解决方案在很大程度上就是在这种文件夹层次中导航。
在Outlook对象模型中,Application对象包含NameSpace对象;NameSpace对象包含给定数据源(如MAPI消息库)中所有文件夹,即MAPIFolder对象集合;MAPIFolder对象包含该文件夹中所有条目对象;每个条目对象包含用于对其进行控制的可编程对象。
各对象含义如下:
●Application对象是整个模型的根对象,由CreateOleObject或GetActiveOleObject 函数返回;
●NameSpace对象代表任何可识别数据源,如MAPI消息库;
●Folders对象集合包括指定消息库(或任何可识别数据源)及其下级文件夹中所有的MAPIFolder文件夹对象;
●Items对象集合包括指定文件夹中所有Item条目对象;
●Explorer对象用于显示一个文件夹的窗口;
●Inspector对象用于显示一个条目的窗口。
Outlook对象编程步骤
1.在Delphi 5中,采用后期绑定来初始化一个Automation过程时,建议引用outlook8.pas单元,该单元包括Outlook类型库中所用常量定义。
2.建立一个Application类的实例。
3.调用GetNamespace过程指定要使用的名字空间。
若使用后期绑定,则所有对象变量均必须为Variant类型,如OutlookApplication, OutlookNameSpace等。
OutlookNameSpace:=Outlook.GetNamespace
(‘MAPI’);
4.调用Outlook名字空间的Logon 方法登记到邮件系统。该方法的四个参数的含义分别为Microsoft Exchange Profile文件名、口令、是否显示标准登录对话框、是否建立一个新的Microsoft Exchange会话。例如:
OutlookNameSpace.Logon(ProfileStr, PasswordStr, False, True);
5.调用Outlook名字空间的GetDefaultFolder方法返回所请求的默认的MapiFolder文件夹对象(即MAPI名字空间内的一个文件夹)。例如,将默认的Contacts文件夹对象赋给OutlookFolder变量的方法如下:
OutlookFolder := OutlookNameSpace.
GetDefaultFolder(olFolderContacts);
又如,下列语句可以显示发件箱文件夹名称:
Caption := Variant(OutlookNameSpace.
GetDefaultFolder(olFolderOutbox));
此外,还可以使用文件夹集合Folders(索引)方法查找文件夹。这是查找自定义、非标准文件夹的唯一方法。如:
urgentFolder := olMAPI.Folders(“Mailbox - Zhang Chunming”).Folders(“Urgent”);
下面例子显示收件人ZhangChunming的共享日历文件夹:
OutlookReciepientItem := OutlookNameSpace.
CreateRecipient(‘ZhangChunming’);
OutlookReciepientItem.Resolve;
if OutlookReciepientItem.Resolved <> 0 then
begin
OutlookFolder := OutlookNameSpace.
GetSharedDefaultFolder(OutlookReciepientItem,
olFolderCalendar);

文章评论

程序员的鄙视链
程序员的鄙视链
Java程序员必看电影
Java程序员必看电影
如何区分一个程序员是“老手“还是“新手“?
如何区分一个程序员是“老手“还是“新手“?
要嫁就嫁程序猿—钱多话少死的早
要嫁就嫁程序猿—钱多话少死的早
 程序员的样子
程序员的样子
10个调试和排错的小建议
10个调试和排错的小建议
Java 与 .NET 的平台发展之争
Java 与 .NET 的平台发展之争
我跳槽是因为他们的显示器更大
我跳槽是因为他们的显示器更大
科技史上最臭名昭著的13大罪犯
科技史上最臭名昭著的13大罪犯
看13位CEO、创始人和高管如何提高工作效率
看13位CEO、创始人和高管如何提高工作效率
每天工作4小时的程序员
每天工作4小时的程序员
程序员的一天:一寸光阴一寸金
程序员的一天:一寸光阴一寸金
程序员周末都喜欢做什么?
程序员周末都喜欢做什么?
编程语言是女人
编程语言是女人
团队中“技术大拿”并非越多越好
团队中“技术大拿”并非越多越好
中美印日四国程序员比较
中美印日四国程序员比较
聊聊HTTPS和SSL/TLS协议
聊聊HTTPS和SSL/TLS协议
程序员最害怕的5件事 你中招了吗?
程序员最害怕的5件事 你中招了吗?
60个开发者不容错过的免费资源库
60个开发者不容错过的免费资源库
程序员和编码员之间的区别
程序员和编码员之间的区别
亲爱的项目经理,我恨你
亲爱的项目经理,我恨你
不懂技术不要对懂技术的人说这很容易实现
不懂技术不要对懂技术的人说这很容易实现
Web开发者需具备的8个好习惯
Web开发者需具备的8个好习惯
老程序员的下场
老程序员的下场
程序员都该阅读的书
程序员都该阅读的书
初级 vs 高级开发者 哪个性价比更高?
初级 vs 高级开发者 哪个性价比更高?
漫画:程序员的工作
漫画:程序员的工作
程序员必看的十大电影
程序员必看的十大电影
写给自己也写给你 自己到底该何去何从
写给自己也写给你 自己到底该何去何从
鲜为人知的编程真相
鲜为人知的编程真相
做程序猿的老婆应该注意的一些事情
做程序猿的老婆应该注意的一些事情
我的丈夫是个程序员
我的丈夫是个程序员
程序员应该关注的一些事儿
程序员应该关注的一些事儿
为啥Android手机总会越用越慢?
为啥Android手机总会越用越慢?
如何成为一名黑客
如何成为一名黑客
旅行,写作,编程
旅行,写作,编程
那些争议最大的编程观点
那些争议最大的编程观点
代码女神横空出世
代码女神横空出世
5款最佳正则表达式编辑调试器
5款最佳正则表达式编辑调试器
一个程序员的时间管理
一个程序员的时间管理
当下全球最炙手可热的八位少年创业者
当下全球最炙手可热的八位少年创业者
程序猿的崛起——Growth Hacker
程序猿的崛起——Growth Hacker
老美怎么看待阿里赴美上市
老美怎么看待阿里赴美上市
10个帮程序员减压放松的网站
10个帮程序员减压放松的网站
“肮脏的”IT工作排行榜
“肮脏的”IT工作排行榜
软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有