problema no envio de e-mail(preciso mto da ajuda d vcs!)...

Question

bom dia,caros colegas:estou com um problema no seguinte cdigo de envio de e-mail!!!o codigo � o seguinte:procedure TForm1.Button1Click(Sender: TObject);begin    NMSMTP1.Host := �smtp.terra.com.br�;   ...

Motta · Answer

O Terra requer autenticacao, achofa�o assim :function TfrmConfigura.EnviarEmail(rem,dest,assun,msg : string):boolean;const p = �senha�;begin  try    //Processo de reconhecimento no POP3 do UOL    NMPOP31.AttachFilePath := �.�;    NMPOP31.DeleteOnRead := FALSE;    NMPOP31.ReportLevel := Status_Basic;    NMPOP31.TimeOut := 20000;    NMPOP31.Host := �xxx.xxx.xxx.xxx�;    NMPOP31.Port := 110;    NMPOP31.UserID := �usuario�;    NMPOP31.Password := p;    NMPOP31.Connect;    //    Result := True;    NMSMTP1.Host := �xxx.xxx.xxx.xxx�;    NMSMTP1.Port := 25;    NMSMTP1.UserID :=  �usuario�;    NMSMTP1.Connect;    if not NMSMTP1.Connected then      Result := False;    if Result then    begin      NMSMTP1.PostMessage.FromAddress := rem;      NMSMTP1.PostMessage.ToAddress.Clear;      NMSMTP1.PostMessage.ToAddress.Add(dest);      NMSMTP1.PostMessage.Subject     := assun;      NMSMTP1.PostMessage.Body.Text   := msg;      NMSMTP1.SendMail;      NMSMTP1.Disconnect;      NMPOP31.Disconnect;    end;  except    on e:exception do    begin      Result := False;    end;  end;end;send o servidor interno , n�o testei para a rua...

Denis · Answer

S� uma dica. Use o componente Indy do delphi. Ele � muito bom....

Alexandrezendron · Answer

vlw pela ajuda galerah!!!!vou testar e depoix eu volto aki!!!!1...

Nigro · Answer

Como usar o Indy no Delphi7?...

F�rum problema no envio de e-mail(preciso mto da ajuda d vcs!)... #194801