Dúvida ao enviar e-mail

Delphi

09/02/2005

Olá,

copiei esta parte de um codigo aqui mesmo do fórum, mas só estou conseguindo enviar mensagens para os endereços que fazem parte de algo@pmsjp.pr.gov.br, qualquer nome deste domínio funciona, mas quando tento enviar um e-mail para algum hotmail, yahoo, gmail ou qualquer outro dá erro.

Alguem aí pode me ajudar ?

      nmsmtp1.postmessage.toAddress.clear;

      
      nmsmtp1.postmessage.FromAddress:=´wmfag@yahoo.com.br´;
      nmsmtp1.PostMessage.FromName:=´Remetente de Teste´;

      nmsmtp1.userid :=´fernanda@pmsjp.pr.gov.br´;
      nmsmtp1.host := ´mail.pmsjp.pr.gov.br´;

      //Aqui o erro, só funciona se for um e-mail de @pmsjp.pr.gov.br
      nmsmtp1.postmessage.toAddress.Add(´walacef@gmail.com´);
      nmsmtp1.postmessage.subject :=edAssunto.Text;
      nmsmtp1.postmessage.body.clear;
      nmsmtp1.postmessage.body.add(edMensagem.Text);
      nmsmtp1.postmessage.body.add(´´);
      nmsmtp1.postmessage.body.add(´Enviado pelo Sistema.´);
      nmsmtp1.connect;
      nmsmtp1.sendmail;
      nmsmtp1.disconnect;
      frmEnvia.Cursor:=crDefault;
      showmessage(´Mensagem Enviada com Sucesso.´);
      btnLimparClick(self);
   except
      frmEnvia.Cursor:=crDefault;
      nmsmtp1.disconnect;
      showmessage(´Erro no envio da Mensagem !´);
   end;


Valeu ae pessoal !


Walace

Walace

Curtidas 0

Respostas

Walace

Walace

09/02/2005

Up


GOSTEI 0
Nerdex

Nerdex

09/02/2005

Acho que tu tá numa intranet... olhe o host que tu tá usando.
Estás num esquema fechado...

Use um host + um login + senha de um servidor como Terra e tantos outros por aí...


GOSTEI 0
POSTAR