如何发送电子邮件(POP3)(50分)

  • 主题发起人 主题发起人 CJ
  • 开始时间 开始时间
C

CJ

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在自己的程序中向POP3服务器发送电子邮件?
SOURCE/COMPONENT PLEASE!
MAIL ME AT:
CJCJC@ONLINE.SH.CN
 
Hello CJ:
Happy New year!
Delphi自带的NMSMTP可以用来发送Mail, "Teach Your Self Delphi4 in 21 Days"
后面教你如何在你的程序中发送邮件.
Delphi32深度历险中有样例程序
 
NMSMTP的离子DELPHI4就已经相当全面了.
告诉你个小技巧:
NMSMTP写出来的程序可以发匿名邮件噢 :-)
 
如果你只想发送简单的邮件,可以用POP3协议命令。
 
TO:HUIZHANG AND 唐:
NMSMTP是不是ACTIVEX?不喜欢这东西!D4的COMPONENTS好象不能做POP3
(只收不发)
TO HUIZHANG:
WHERE COULD I FIND THE BOOK?
TO merlin:
哪里可以得到有关指令集?
小弟网盲,诸位多多指教


 
Hello CJ:
tcpip.zip -- a set of web components, mailed to you
 
to Huizhang :
我也要!谢谢!<a href="mailto: xftang@shtdu.edu.cn">xftang@shtdu.edu.cn</a>
to cj:
NMSMTP是标准的控件,Nmpop3字面上就应该看出来了吧!
看看/DEMOS/INTERNET/SMTP/&amp;/DEMOS/INTERNET/SMTP/POP3
你就什么都明白了
Good Luck!

 
网盲,没有办法,98年中刚上的网,再请教:
1、D4有个POP3构件是做什么用的?好象看EXAMPLE它可以接受邮件,但不能发?
2、SMTP和POP3是不是两种东西?
3、如果是,那么如何用NMSMTP发送POP3电子邮件?(由于种种原因未试)
又为河有:DEMOS/INTERNET/SMTP/POP3 的说法?包括张先生的控件,好象
也是如此!
merlin:我对你的答案挺感兴趣,能否具体些?
 
CJ:
POP3,SMTP协议提供了一系列的命令,SMTP的命令
较复杂,POP3的协议命令较为简单:
user 用户名:登录邮件服务器,提供用户名
pass 口令:提供口令
list:显示信件列表
retr 信件号:阅读信件的内容,信件号为list命令中显示的信 件号
dele 信件号:删除信件
quit:退出邮件通讯
可用socket编程,连接到pop3服务器(110端口),
然后发送命令,接收信件。
用Eudora收发信的时候,如果网络速度较慢的话,
能显示整个收发信的过程。
SMTP的命令较复杂,详见:《Internet编程》(清华
大学出版社)
你也可以用 telnet POP3服务器 110 命令登录,
试用这些命令,删除垃圾信件特别有用。
 
看windows系统目录下的Nia.hlp!
 
发邮件不需要用到POP3协议,Smtp指令:
hello <domain>
Mail From :<recevse-path>发送者
Rcpt To:<forward-path>接收者
Data 发邮件数据
Reset
Noop
Turn 角色切换
Quit
Vrfy <string>验证用户名
Expn <string>展开邮件表目
help <string>
初始化:
mail send soml,saml
发邮件小例子:
procedure TForm1.FormCreate(Sender: TObject);
begin
{连接到Smtp服务器}
SMTP1.Connect('210.79.245.3', '25');
end;
procedure TForm1.Button1Click(Sender: TOjbect);
begin
{发送邮件}
with SMTP1do
begin
do
cInput.Headers.Clear;
do
cInput.Headers.Add('To', ToAddress);//name@PoP3服务器地址
do
cInput.Headers.Add('From', FromAddress);
do
cInput.Headers.Add('Subject',Subject);
do
cInput.Headers.Add('Content-Type', 'TEXT/PLAIN charset=US-ASCII');}
SendDoc('smtp://210.79.245.3:25',DocInput.Headers,Memo1.text,'','');

end;
end;

 
to chenke:
您的DELPHI是delphi几?服务器的系统不一样,命令好象也不同
delphi4中好象不行
to CJ:
POP3--------post office protocal 专门用发邮件
Smtp--------simple mail translate portocal 专门用收邮件

 
I have detaileddo
c for POP3 and SMTP, IMAP4, but there are
English, who needs them? Or who want to translate them into
Chinese for Delphi Fans, :), is it necessary?
 

看了上面的贴子,我搞糊涂了.
我的印象是POP3用于收邮件,SMTP用于收邮件.D4下的例子是这样,控件SakEmail
所附的例子也是这样的.
 
smtp用来发邮件,PoP3用来管理邮件。
因为我只用一个smtp就做了一个发邮件的程序。in delphi3
 
to CJ:
POP3--------post office protocal 专门用发邮件
Smtp--------simple mail translate portocal 专门用收邮件
??
TO pegasus: Please mail me an english copy
You means pop3 cannot send mail?
why I configure my outlook and just input the pop3 account?
How could mail me a small mail server for 95/nt so i can debug my
program offline. Thank you
I know both yysun and luojun have such stuff, could you mail me?
 
Hehe, POP3 is only used to "Store" your msg,
waiting for you to retrive them, :)
SMTP is designed for "Translate" your msg,
or target machine, the msg will be transfered
from SMTPdo
m to POP3do
m or IMAP4do
m, etc, :)
OK, I'll mail you tomorrow morning, for now the
network is so slow, Ido
not want mail msg take
part in. Sorry, CJ, :)
 
Ohh, I once wrote a Mail server myself, it can run on NT,
if you like, I can mail to you too.
But I'm afaid it is not so easy to be used like normal
GUI program, I designed it to work as a NT service, hehe,
and I learnt to write NT service for this reason before, :).
I'll write the service demo program this week, :)
 
to pegasus:
Thank you very much I see that the q about NT service is end ;)
Is the following true:
1 POP3 only manage mails it did not send mail
2 smtp could send mail and if i want just send mail i could use it
3 use smtp i can send mail through the internet
I want the mail server, thank you
 

Similar threads

后退
顶部