有谁用delphi做过电子邮件发送器吗?请进来看一下我的问题.

Question

我们老师给我提了两种方案:
1.看有没有能直接调用windows 的outlook express应用程序,就是在delphi应用程序里调用该应用软件.
2.完全用delphi开发.TNMSTP控件实现.
如果两种都行的话,我们首选第一种.
请大家帮我想想.

Answer 1

Uses ShellAPI；
OnClick
IE:
ShellExecute(Handle,'Open',‘http://www.csdn.net’,nil,nil,SW_Show);
OE:
ShellExecute(Handle,'Open','mailto:[email protected]',nil,nil,SW_Show);

Answer 2

Uses ShellAPI；
OnClick
IE:
ShellExecute(Handle,'Open',‘http://lysoft.7u7.net’,nil,nil,SW_Show);
OE:
ShellExecute(Handle,'Open','mailto:[email protected]',nil,nil,SW_Show);

Answer 3

Uses ShellAPI；
OnClick
IE:
ShellExecute(Handle,'Open',‘http://lysoft.7u7.net’,nil,nil,SW_Show);
OE:
ShellExecute(Handle,'Open','mailto:[email protected]',nil,nil,SW_Show);

Answer 4

用第二种！你可以到书店找那本"delphi 6网络编程"的书，讲的很仔细！

Answer 5

谢谢各位了哟.我决定用第一种方法,to zhaozhe(Thank好心人),请问怎样给参数赋直呢?
 ShellExecute(handle, 'Open', 'mailto: [email protected] [email protected] &Subject=xxxxx &body=hello,xxx &file=e:\share\是男人就钓一万分', '', '', SW_SHOWNORMAL);我用上面的方式赋直时只有前面几个才是对的.后面加附件是错的,请问怎样给这个参数赋直呢.
to ： Drate(小虫),请给我发一份好吗,太谢谢你了.
我的email: [email protected]
朋友们,有好东西的时候别忘了给我发哟.

Answer 6

这个很类似于html语言中的写法。

Answer 7

快救命呀,我弄了一天了,还没弄出来.我用GOOGLE查了一下午,查到的结果是加附件只对一些邮件程序有用,有些用不起.outlook就行,outlook express就不行.把我气昏了.我该怎么办呢?还有介绍可以用OLE技术的.请高手帮我看看吧.http://www.elists.org/pipermail/delphi/2003-February/022995.html要用代理哟.

Answer 8

ShellExecute(Handle,'Open','mailto:[email protected]',nil,nil,SW_Show);
这个就可以办得到呀，

Answer 9

to holy520(我想狂编) 我是用的这个也,可问题是我加不进附件的参数呢,前面几个都行.我在网上查了一下,好象outlook express不支持这个.outlook支持加附件,我是要用outlook express,你看我该怎么办呢.谢谢了.

Answer 10

收发邮件使用了pop3协议和smtp协议,delphi自带的tnmpop3和tnmsmtp控件

Answer 11

请有原码的朋友给我一分吧.谢谢[email protected]

Answer 12

请有原码的朋友给我一分吧.谢谢[email protected]