Office中国论坛/Access中国论坛

标题: 双击数据如何调用OUTLOOK自动填入数据发送邮件 [打印本页]

作者: xyh2732 时间: 2012-9-27 10:33
标题: 双击数据如何调用OUTLOOK自动填入数据发送邮件
[attach]50449[/attach]请教一个问题调用OUTLOOK发送邮件，上面表格已经设定好发送邮件的相关信息，可否做到双击收件人，系统制动弹出OUTLOOK发件框，同时自动把对应的收件人、抄送、内容自动填入邮件内。

作者: 咱家是猫 时间: 2012-9-27 11:46
..............

作者: xyh2732 时间: 2012-9-27 13:00
本帖最后由 xyh2732 于 2012-9-27 13:00 编辑

咱家是猫发表于 2012-9-27 11:46
..............

非常感谢你的帮，我漏了个附件问题麻烦在帮我看看，要同时吧附件添加到OUTLOOK，条件是附件包含主题的附见，比如附件集中放在“D:\文件存放”，比如主题是123 拿系统就在“D:\文件存放”中查找出包含123名称的文档。

作者: xyh2732 时间: 2012-9-27 18:46

咱家是猫发表于 2012-9-27 11:46
..............

作者: 咱家是猫 时间: 2012-9-27 21:30
本帖最后由咱家是猫于 2012-9-27 21:44 编辑

mailto好象没有附件功能.如果要带上附件功能,你可以创建一个CDO.Message对象来处理.
具体你可以搜索下论坛上 t小宝发过一个,不用OutLook发邮件的帖子.

作者: 咱家是猫 时间: 2012-9-27 21:42
http://www.office-cn.net/forum.p ... p;highlight=Outlook
不引用Outlook发送邮件

作者: xyh2732 时间: 2012-9-27 21:54

咱家是猫发表于 2012-9-27 21:42
http://www.office-cn.net/forum.php?mod=viewthread&tid=59997&highlight=Outlook
不引用Outlook发送邮件

非常感谢您的帮忙。。。。

作者: lazybird 时间: 2012-10-6 17:34
我凑热闹提个问题，如何改变正文的字体和颜色呢，例如

mailText = "您好：" & vbCrLf & vbCrLf & _
   "您的订单号为" & vbCrLf & vbCrLf & _
   "12345678"& vbCrLf & vbCrLf & _       ----------------比如说我想把这一行加粗显示为红色，怎么设置
   "请查收"

作者: xyh2732 时间: 2012-12-3 17:05

lazybird 发表于 2012-10-6 17:34
我凑热闹提个问题，如何改变正文的字体和颜色呢，例如

mailText = "您好：" & vbCrLf & vbCrLf & _

你好啊，我看你在我的提问里面提问了个问题，我想请教一下你的而邮件内容可以换行显示吗？可否给个代码看看

作者: lazybird 时间: 2012-12-4 14:49
vbCrLf ---- 换行符

作者: xyh2732 时间: 2012-12-4 14:56

lazybird 发表于 2012-12-4 14:49
vbCrLf ---- 换行符

我试过了，也不行，还是在一行，可否给你的全部代码看看，不方便可以发QQ99317374 ,谢了

作者: xyh2732 时间: 2012-12-5 13:59

咱家是猫发表于 2012-9-27 11:46
..............

[attach]50841[/attach]你好，上次感谢你帮忙做了个OUTLOO调用的代码，有个问题还想请教一下

现在双击内容会调用OUTLOOK把对应内容填写到邮件上面但是有个问题，在填写内容的是后如何可以使内容与签名的格式保留，现在双击内容是这样显示的“DEIL:ANNA请查看，谢谢！ PETER敬上 Accounts [url=mailto Department123@163.COMAepartment 123@163.COM]Department123@163.COM[/url[/url]] ”没有换行如何可以达到下面的效果，根据需要环行

下面为想要的效果

DEIL:ANNA

请查看，谢谢！

PETER敬上
Accounts Department
123@163.COM

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)