verificar emails (POP3)

Question

como posso conseguir acessar uma conta de email atrav�s do POP3 e varrer todas as mensagens da caixa postal analisando os t�tulos?...

Massuda · Answer

Exemplo usando o componente TIdPOP3 do Indy.

var
  N: Integer;
  I: Integer; 
...
  // IdMessage1 � um TIdMessage
  // IdPOP31 � um TIdPOP3

  IdPOP31.Host := �nome-do-seu-servidor-POP3�; 
  IdPOP31.Username := �seu-username�; 
  IdPOP31.Password := �sua-senha-secreta�; 
  
  IdPop31.Connect; 

  try 
    N := IdPop31.CheckMessages; 
    for I := 0 to N-1 do begin 

      IdMessage1.Clear; 

      if IdPop31.RetrieveHeader(I, IdMessage1) then begin

        // IdMessage1.Subject tem o assunto/t�tulo do email
        // IdMessage1.Body e correlatos est�o vazios
      end; 
  finally 
    IdPop31.Disconnect; 
  end;

Raserafim · Answer

valeu massuda,vc poderia explicar um pouco sobre o componente TIdMessage?...

Massuda · Answer

O TIdMessage representa uma mensagem de email e encapsula toda a l�gica de codificar/decodificar a mensagem para/do formato usado pelo servidor de email. Que tipo de detalhe voc� gostaria de saber?

Anderson Lopes · Answer

...

F�rum verificar emails (POP3) #335517