以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  关于报表生成PDF并发送EMAIL  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=99368)

--  作者：hnguang --  发布时间：2017/4/18 10:23:00 --  关于报表生成PDF并发送EMAIL 现在我已经报表生成出来并保存为PDF文件,请问要怎样才能调用邮件客户端并自动发送

--  作者：有点蓝 --  发布时间：2017/4/18 10:47:00 --   参考：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=76464&skin=0

--  作者：hnguang --  发布时间：2017/4/18 10:49:00 --   已测试OK 代码如下: Dim o As New Outlook.Application Dim msg As Outlook.MailItem msg = o.CreateItem(Outlook.OlItemType.olMailItem) msg.Recipients.Add(strgysemail)  \'收件人郵件地址 msg.Subject = "采购单"  \'郵件主旨 msg.Body = ""  \'郵件內容 msg.Attachments.Add(fl)  \'添加採購訂單pdf件為附件 msg.Send()