关于无smtp发送邮件？？？？？？？

Question

假设我用的是163的邮箱，我要发给新浪的邮箱一封信，如果我用163发信的话那一定要认证的。、
现在我知道了新浪邮件服务器的地址了202。106。84。200了，我要用什么命令来把信直接给它呢？？？？

Answer 1

http://www.gezehua.com/soft/
向站长所要源码！！！祝：身体健康，答案和分数同样重要！！！

Answer 2

建议用:IndyDemos\SMTPRelay
只要dns,和对方的email就ok,不要验证，也不要....

Answer 3

用Indy的IdSMTP控件很容易实现，只需要知道邮件服务器的名称和该邮件服务器的邮件地址就可以了，源代码如下：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, IdBaseComponent, IdComponent, IdRawBase,
  IdRawClient, IdIcmpClient, IdMessage, IdTCPConnection, IdTCPClient,
  IdMessageClient, IdSMTP;type
  TForm1 = class(TForm)
    lbledtServer: TLabeledEdit;
    lbledtMail: TLabeledEdit;
    mmContent: TMemo;
    Button1: TButton;
    Label1: TLabel;
    IdMessage: TIdMessage;
    lbledtSubject: TLabeledEdit;
    lbledtFrom: TLabeledEdit;
    IdSMTP: TIdSMTP;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  with IdMessage do
  begin
    //发件人的E_mail地址
    if From.Text <> '' then
      From.Text := lbledtFrom.Text;
    //收件人的E-mail地址
    Recipients.EMailAddresses := lbledtMail.Text;
    //邮件主题
    Subject := lbledtSubject.Text;
    //邮件内容
    Body.Assign(mmContent.Lines);
  end;
  with IdSMTP do
  begin
    //邮件服务器的地址
    Host := lbledtServer.Text;
    if not Connected then
      Connect;
    Send(IdMessage);
  end;
end;end.

Answer 4

我有源代码，你要不要？要的话妹儿我
[email protected]

Answer 5

这个发送邮件的程序我已经做出来了，就是不能进行超链接，各位有没有好的办法啊！如果谁要看看源代码可以给我发信[email protected]

Answer 6

很多地址发不出去的http://www.gezehua.com/soft/这个就在局域网中无法向163.com发送邮件