PB调用outlook发送任务,日历/约会 分不够可以另开帖加,该怎么解决
PB调用outlook发送任务,日历/约会 分不够可以另开帖加
如题: 期望找到PB调用outlook发送任务.日历/约会
急切盼望:谢谢!
------解决方案--------------------
如题: 期望找到PB调用outlook发送任务.日历/约会
急切盼望:谢谢!
------解决方案--------------------
- SQL code
不懂，帮顶，学习，蹭分.
------解决方案--------------------
非要调用outlook的日历约会吗？
你用PB做个日历约会功能，然后调用outlook发送不就行了吗？
------解决方案--------------------
------解决方案--------------------
------解决方案--------------------
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（索引）方法返回指定的条目对象。返回指定文件夹中第一个条目对象的方法如下：