[原创]自动发邮件--支持群发+发送附件(当前DWG)功能!

nonsmall · 发表于 2008-10-22 09:00:00

aicr317发表于2008-10-21 18:27:00不安装OFFICE中的OUTLOOK,我想直接调用WINDOWS自带的OUTLOOK EXPRESS行吗，期待LZ回答！！！如果可以的话，应该怎么修改呢？？？

不清楚你是否安装了OutLook

但是直接调用邮件发送可以这样

(command "start" "mailto:test@163.com")

或者使用startapp函数调用

liminnet · 发表于 2008-10-22 09:37:00

nonsmall大哥我的不知道为什么会有25楼的提示，如果要是默认是Y就好啦

最后，本人测试了这个程序，邮件是可以发了，但如果发给别人的QQ邮箱中去，会自动被放在垃圾箱中的（不是本人QQ邮箱设置问题），我已测试过好多次啦，除了QQ邮箱后，别的都会放到收件箱中的

16335181 · 发表于 2008-10-22 10:48:00

liminnet发表于2008-10-22 9:37:00nonsmall大哥我的不知道为什么会有25楼的提示，如果要是默认是Y就好啦最后，本人测试了这个程序，邮件是可以发了，但如果发给别人的QQ邮箱中去，会自动被放在垃圾箱中的（不是本人QQ邮箱设置问

请看帮助垃圾邮箱的定义.........

nonsmall · 发表于 2008-10-22 10:53:00

liminnet发表于2008-10-22 9:37:00nonsmall大哥我的不知道为什么会有25楼的提示，如果要是默认是Y就好啦最后，本人测试了这个程序，邮件是可以发了，但如果发给别人的QQ邮箱中去，会自动被放在垃圾箱中的（不是本人QQ邮箱设置问

默认的问题你自己设置一下自己的outlook应该就行了 (应该第一次发送的时候有提示)

别人怎么存你的邮件是别人邮箱的问题了这个无法解决

liminnet · 发表于 2008-10-22 11:52:00

次次都有，我在选项中找了好多遍没看到那有设置的

aicr317 · 发表于 2008-10-23 12:26:00

nonsmall发表于2008-10-22 9:00:00不清楚你是否安装了OutLook但是直接调用邮件发送可以这样(command \"start\" \"mailto:test@163.com\")或者使用startapp函数调用

我没有安装OFFICE中的OUTLOOK，用的是WINDOWS自带的，如果不安装就不能用你这个功能吗？我不想用MAILTO的方法！！

liminnet · 发表于 2008-10-23 18:00:00

大哥，我想再问一下，可不可以，调用winRAR来压缩一个文件夹，再用上面的程序发送，程序可以实现的了吗

nonsmall · 发表于 2008-10-23 21:06:00

to 36

如果这句话(vlax-create-object "Outlook.Application")返回nil就用不了

对于OUTLOOK EXPRESS我还没有找到相关的参考

to 37

这个我现在无能为力你要想修改这个程序实现更多的功能可以参考outlook VBA

zhongys · 发表于 2010-7-8 00:43:00

真是强人!!!

357785513 · 发表于 2010-7-8 12:36:00

张兄,我的电脑没有联网也帮我写一个发邮件的呀

账号		自动登录	找回密码
密码			注册

[【不死猫】] [原创]自动发邮件--支持群发+发送附件(当前DWG)功能!