设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 6797|回复: 24
打印 上一主题 下一主题

[窗体] 通过access一次性将收件人的地址写进outlook收件人中

[复制链接]

点击这里给我发消息

1#
发表于 2015-3-9 12:30:00 | 显示全部楼层
看看是不是这个效果

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

点击这里给我发消息

2#
发表于 2015-3-9 15:41:59 | 显示全部楼层
看下SendObject方法的参数你就知道怎么设置收件人跟抄送了。不过你界面里面也需要设置一个。第4个参数是收信人
第5个参数是抄送的

语法
表达式.SendObject(ObjectType, ObjectName, OutputFormat, To, Cc, Bcc, Subject, MessageText, EditMessage, TemplateFile)
表达式   一个代表 DoCmd 对象的变量。
参数
名称必选/可选数据类型说明
ObjectType可选AcSendObjectTypeAcSendObjectType 常量,指定要发送的对象的类型。
ObjectName可选Variant[url=]字符串表达式 (字符串表达式:任一求值为一列连续字符的表达式。表达式的元素可以是:返回字符串或字符串 Variant (VarType 8) 的函数;字符串字面值、常量、变量或 Variant。)[/url],表示 objecttype 参数所选类型的对象的有效名称。如果要在邮件中包括活动对象,请使用 objecttype 参数指定对象的类型,并将该参数保留为空。如果将 objecttypeobjectname 参数都保留为空(对于 objecttype 参数,采用默认常量 acSendNoObject),Microsoft Access 将向电子邮件应用程序发送邮件,但不包括数据库对象。如果您运行的 Visual Basic 代码包含了[url=]类库数据库 (类库数据库:可以从任意应用程序中调用的过程和数据库对象的集合。为了使用库中的项,必须先建立从当前数据库到类库数据库的引用。)[/url]中的 SendObject 方法,Microsoft Access 先在这个类库数据库中查找此名称的对象,然后在当前数据库中查找。
OutputFormat可选Variant
To可选Variant字符串表达式,列出名称要放在邮件的“收件人”行中的收件人。用分号 (;) 或列表[url=]分隔符 (分隔符:用来分隔文本或数字单元的字符。)[/url](在 Windows 控制面板的“区域设置属性”对话框的“数字”选项卡中设置)分隔在该参数及 ccbcc 参数中指定的收件人名称。如果收件人名称不能被邮件应用程序识别,那么将不会发送该邮件并将产生错误。如果将该参数保留为空,Microsoft Access 会提示您输入收件人。
Cc可选Variant字符串表达式,列出名称要放在邮件“抄送”行中的收件人。如果将该参数保留为空,则邮件中的“抄送”行也将为空。
Bcc可选Variant字符串表达式,列出名称要放在邮件“密件抄送”行中的收件人。如果将该参数保留为空,则邮件中的“密件抄送”行也将为空。
Subject可选Variant字符串表达式,包含要放在邮件“主题”行中的文本。如果将该参数保留为空,则邮件中的“主题”行也将为空。
MessageText可选Variant字符串表达式,包含要包括在邮件正文中、且位于该对象后面的文本。如果将该参数保留为空,则对象是邮件正文中包含的全部内容。
EditMessage可选Variant使用 True (-1) 将立即打开电子邮件应用程序并加载邮件,这样就可以编辑邮件。使用 False (0) 将不进行编辑就发送邮件。如果将该参数保留为空,将采用默认值 (True)。
TemplateFile可选Variant字符串表达式,表示用作 [url=]HTML (HTML:万维网文档所用的标准标记语言。HTML 使用标记来指定 Web 浏览器对文字和图形等网页元素的显示方式以及对用户操作的响应方式。)[/url] 文件的模板文件的完整名称(包括路径)。




回复

使用道具 举报

点击这里给我发消息

3#
发表于 2015-3-10 16:28:35 | 显示全部楼层
要通过列表来添加多个收件人的话,你需要自己设计一个窗体,来返回选择的收件人,我这里是思路:
1、首先你得未数据库添加一个表,名为联系人表,至少要有一个联系人邮箱地址字段;
2、然后基于这个联系人邮箱地址字段自动生成一个数据表窗体,这个窗体作为联系人拾取器;
3、在那个收件人MailTo文本框右侧放一个按钮,单击按钮弹出一个联系人拾取器窗体;4、为联系人拾取器添加代码,通过设置按钮或者双击某行记录时将当前所选择这个联系人地址返回;
5、捕获这个返回的联系人地址字符串,将其添加到MailTo文本框中,当然添加前需要追加一个分号“;”,因为分号是多个联系人地址之间的分隔符;

回复

使用道具 举报

点击这里给我发消息

4#
发表于 2015-3-10 17:44:34 | 显示全部楼层
本帖最后由 站到终点站 于 2015-3-10 17:46 编辑

没有使用之前说的方式,我直接使用了复合框,单击右侧按钮,会出现一个复合框,选择一个邮件地址后,复合框自动隐藏

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-17 04:10 , Processed in 0.098901 second(s), 28 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表