| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://www.weistock.com/bbs/index.asp) -- 金字塔软件问题提交 (http://www.weistock.com/bbs/list.asp?boardid=2) ---- VBA发送邮件附件没有内容 (http://www.weistock.com/bbs/dispbbs.asp?boardid=2&id=162798) |
| -- 作者：Yangygzy -- 发布时间：2018/4/16 12:01:48 -- VBA发送邮件附件没有内容 我按照下面代码发送邮件，并添加了附件，可是附件内容是空的，这个什么原因？ Sub mail Set smtpmail=CreateObject("wwscommon.smtpmail") smtpmail.sendername="gzy" smtpmail.senderaddress="Mymail@163.com" smtpmail.subject="预警" Call smtpmail.addreceiver("aa","18623195847@163.com") Call smtpmail.addtextcontent("sss") Call smtpmail.AppOctStrmContent("D:\\INVESTMENT\\投资观察.xlsx") Call smtpmail.sender("smtp.163.com","Mymail@163.com","password") application.MsgOut("发送邮件完成") End Sub
|
| -- 作者：Yangygzy -- 发布时间：2018/4/16 12:44:14 -- 补充，文件附上去了，但没有文件内容，0 kb |
| -- 作者：yukizzc -- 发布时间：2018/4/16 13:03:43 -- 工具-网络-设置 看下这里测试发送邮件是否能发 |
| -- 作者：Yangygzy -- 发布时间：2018/4/16 13:13:13 -- 可以发的，只是附近内容为0kb |
| -- 作者：banzhuan -- 发布时间：2018/4/16 13:42:27 -- 稍等，工作人员本地核实一下该问题 [此贴子已经被作者于2018/4/16 13:46:03编辑过]
|
| -- 作者：yukizzc -- 发布时间：2018/4/16 14:07:03 -- 你发一个txt文件试试呢 |