当前位置: 代码迷 >> PB >> PB调用outlook发送任务,年历/约会 分不够可以另开帖加
  详细解决方案

PB调用outlook发送任务,年历/约会 分不够可以另开帖加

热度:449   发布时间:2016-04-29 05:51:48.0
PB调用outlook发送任务,日历/约会 分不够可以另开帖加
如题: 期望找到PB调用outlook发送任务.日历/约会 

急切盼望:谢谢!


------解决方案--------------------
不懂,帮顶,学习,蹭分.

------解决方案--------------------
非要调用outlook的日历约会吗?

你用PB做个日历约会功能,然后调用outlook发送不就行了吗?
------解决方案--------------------
引用:
如题: 期望找到PB调用outlook发送任务.日历/约会 

急切盼望:谢谢!

没用过,不过偶个人认为这不属于API调用的问题,而是OLE编程的问题。
------解决方案--------------------
引用:
如题: 期望找到PB调用outlook发送任务.日历/约会 

急切盼望:谢谢!

没用过,不过偶个人认为这不属于API调用的问题,而是OLE编程的问题。
------解决方案--------------------
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);   
OutlookFolder.Display;   
end;   
6.用MAPIFolder对象的Items属性返回该对象包含的条目对象集合。   
有三种方法可以返回指定的条目对象:   
●可以用Items(名字)方法返回指定的条目对象。如:下面语句返回指定文件夹中题目为“会议通知”的条目对象:   
    OutlookMailItem:=OutlookFolder.Items(‘会议通知’);   
●也可以用Items(索引)方法返回指定的条目对象。返回指定文件夹中第一个条目对象的方法如下:   
  OutlookMailItem   :=   OutlookFolder.Items(1);   
下面例子遍历指定文件夹(MAPIFolder对象)中所有条目对象集合,并显示条目主题。   
for   i   :=   1   to   OutlookFolder.Items.Count   do   
begin   
Caption   :=   Caption   +‘-’   +   String(OutlookFolder.Items[i]);   
  相关解决方案