代码-delphi 用CreateOLEObject 不能cc 多个人

作者:用户 来源:互联网 浏览:426 次 时间:2016-09-28 13:59:51

stringdelphi代码outlook

代码-delphi 用CreateOLEObject 不能cc 多个人 - 摘要: delphi用CreateOLEObject不能cc多个人delphi用CreateOLEObject('Outlook.Application')不能cc多个人,aEmail[1]放的是ccaddr

问题描述

delphi 用CreateOLEObject 不能cc 多个人

delphi 用CreateOLEObject ('Outlook.Application') 不能cc 多个人,aEmail[1] 放的是cc address,如果只有1个就没error,如果有2个就show error
“outlook无法识别一个或多个名称”
代码如下
procedure sendemail(aEmail:array of string);
var

Outlook: Variant;
Mail: Variant;
Recipient:Variant;
const
olTo=1;
olCC=2;
olBCC=3;

begin
if (aEmail[0]='') and (aEmail[1]='') then exit;
Outlook := CreateOLEObject ('Outlook.Application');
if VarIsEmpty(Outlook) then
begin
ShowMessage('Outlook create failed ??');
Exit;
end;
Mail:=Outlook.CreateItem(0);
Mail.To:=aEmail[0];
if aEmail[1]<>'' then
begin
Recipient:=Mail.Recipients.Add(aEmail[1]);
Recipient.Type:= olCC;
end;

Mail.Subject:= aEmail[2];
Mail.Body:=aEmail[3];
if trim(aEmail[4])<>'' then
Mail.Attachments.add(trim(aEmail[4]));
Mail.Send;
Outlook:=Unassigned;
end;

【云栖快讯】你想见的Java技术专家都在这了,向大佬提问,有问题必答  详情请点击
云栖社区(yq.aliyun.com)为您免费提供代码-delphi 用CreateOLEObject 不能cc 多个人相关信息,包括 stringdelphi代码 outlook 的信息 ,所有代码-delphi 用CreateOLEObject 不能cc 多个人相关内容均不代表云栖社区的意见! 该页面h5页面的地址是:https://m.aliyun.com/yunqi/wenzhang/show_58119,您可以点击代码-delphi 用CreateOLEObject 不能cc 多个人-手机站访问。
弹性可伸缩的计算服务,助您降低 IT 成本,提升运维效率

40+云计算产品,6个月免费体验

现在注册,免费体验40+云产品,及域名优惠!

云服务器9.9元/月,大学必备

热点导航