Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-10-2007
fide fide is offline
Miembro
 
Registrado: oct 2006
Posts: 331
Poder: 18
fide Va por buen camino
Question Mails Nuevos con TidIMAP4

Hola. Desde hace algún tiempo que vengo trabajando con el idPOP3 y me ha ido de maravillas. Pero he tenido que hacer una aplicación de mail más avanzada y tuve que migrar al protocolo IMAP que es más avanzado. Ahí estuve mirando como trabajar con el pero no doy con una cosa. ¿Cómo busco la cantidad de mensajes nuevos en el MAILBOX seleccionado?
Responder Con Cita
  #2  
Antiguo 24-10-2007
pcicom pcicom is offline
Miembro
 
Registrado: may 2003
Ubicación: MONTERREY MEXICO
Posts: 253
Poder: 21
pcicom Va por buen camino
Cita:
Empezado por fide Ver Mensaje
Hola. Desde hace algún tiempo que vengo trabajando con el idPOP3 y me ha ido de maravillas. Pero he tenido que hacer una aplicación de mail más avanzada y tuve que migrar al protocolo IMAP que es más avanzado. Ahí estuve mirando como trabajar con el pero no doy con una cosa. ¿Cómo busco la cantidad de mensajes nuevos en el MAILBOX seleccionado?

Eso va a depender del Servidor IMAP que tengas instalado... puedes intentar buscando por GOOGLE los comandos basicos de IMAP.. y hacer puruebas para comprenderlas conectando con un TELNET ip puertoIMAP

Hace tiempo estube haciendo algo similar con COURIER-IMAP...

Código:
usuario@mydominio:~$ telnet 127.0.0.1 imap2
Trying 127.0.0.1...
Connected to 127.0.0.1.
Escape character is '^]'.
* OK Courier-IMAP ready.
  Copyright 1998-2002 Double Precision, Inc.
  See COPYING for distribution information.

AB LOGIN "username" "password"
AB OK LOGIN Ok.

BC SELECT "Inbox"
* FLAGS (\Draft \Answered ... \Recent)
* OK [PERMANENTFLAGS (\Draft \Answered ... \Seen)] Limited
* 23 EXISTS
* 0 RECENT
* OK [UIDVALIDITY 1026858715] Ok
BC OK [READ-WRITE] Ok

ZZZZ LOGOUT
* BYE Courier-IMAP server shutting down
ZZZZ OK LOGOUT completed

Connection closed by foreign host.
__________________
Poco ha de saber el que no pregunta.. Yo por eso soy un pregunton

Última edición por pcicom fecha: 24-10-2007 a las 01:19:56.
Responder Con Cita
  #3  
Antiguo 24-10-2007
fide fide is offline
Miembro
 
Registrado: oct 2006
Posts: 331
Poder: 18
fide Va por buen camino
Lightbulb Respuesta encontrada...

Ya he logrado mostrar solo la cantidad de correos sin leer que hay en el MailBox con el idIMAP4.

Aqui les va el codigo..

al idIMAP1 lo he renombrado a cliente, y he insertado un idMailBox y lo he renombrado a MailBox1.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin    cliente.Host := 'correo.ipigto.rimed.cu';
  cliente.Port := 143;

  cliente.Username := 'NombreDeUsuario';
  cliente.Password := 'contraseña';
  cliente.Connect;

  cliente.StatusMailBox('INBOX', MailBox1, [mdUnseen]);
  Caption := 'Usted tiene ' +  IntToStr(MailBox1.UnseenMsgs) + ' mensajes nuevos en la bandeja de entrada';

end;


Lo que sucede es que si no llamamos la instruccion StatusMailBox con el ultimo parametro igual a mdUnseen pues entonces la otra instruccion de abajo nos devuelve 0 en la cantidad de correos sin leer...
Responder Con Cita
  #4  
Antiguo 03-01-2008
Avatar de santiago14
santiago14 santiago14 is offline
Miembro
 
Registrado: sep 2003
Ubicación: Cerrillos, Salta, Argentina
Posts: 583
Poder: 21
santiago14 Va por buen camino
Question

Cita:
Empezado por fide Ver Mensaje
Ya he logrado mostrar solo la cantidad de correos sin leer que hay en el MailBox con el idIMAP4.

Aqui les va el codigo..

al idIMAP1 lo he renombrado a cliente, y he insertado un idMailBox y lo he renombrado a MailBox1.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin    cliente.Host := 'correo.ipigto.rimed.cu';
  cliente.Port := 143;

  cliente.Username := 'NombreDeUsuario';
  cliente.Password := 'contraseña';
  cliente.Connect;

  cliente.StatusMailBox('INBOX', MailBox1, [mdUnseen]);
  Caption := 'Usted tiene ' +  IntToStr(MailBox1.UnseenMsgs) + ' mensajes nuevos en la bandeja de entrada';

end;


Lo que sucede es que si no llamamos la instruccion StatusMailBox con el ultimo parametro igual a mdUnseen pues entonces la otra instruccion de abajo nos devuelve 0 en la cantidad de correos sin leer...
Hola, estoy tratando de hacer lo mismo pero con el componente de Indy, idPOP3. ¿Cómo puedo hacerlo?
__________________
Uno es responsable de lo que hace y de lo que omite hacer.
Responder Con Cita
  #5  
Antiguo 10-05-2012
Avatar de ramflores
ramflores ramflores is offline
Miembro
 
Registrado: may 2005
Ubicación: Monterrey, Mex.
Posts: 87
Poder: 19
ramflores Va por buen camino
Hola, estoy tratando de hacer este ejemplo, con un servidor de correo interno, pero no me hace nada, me marca un error, en INBOX, asi debe ser?, el host, seria la ip del servidor?

gracias de antemano

Cita:
Empezado por fide Ver Mensaje
Ya he logrado mostrar solo la cantidad de correos sin leer que hay en el MailBox con el idIMAP4.

Aqui les va el codigo..

al idIMAP1 lo he renombrado a cliente, y he insertado un idMailBox y lo he renombrado a MailBox1.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin    cliente.Host := 'correo.ipigto.rimed.cu';
  cliente.Port := 143;

  cliente.Username := 'NombreDeUsuario';
  cliente.Password := 'contraseña';
  cliente.Connect;

  cliente.StatusMailBox('INBOX', MailBox1, [mdUnseen]);
  Caption := 'Usted tiene ' +  IntToStr(MailBox1.UnseenMsgs) + ' mensajes nuevos en la bandeja de entrada';

end;


Lo que sucede es que si no llamamos la instruccion StatusMailBox con el ultimo parametro igual a mdUnseen pues entonces la otra instruccion de abajo nos devuelve 0 en la cantidad de correos sin leer...
__________________
Gracias de antemano
Saludos ........
---------------------------------
Ramiro Flores
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Mostrar mails Drake OOP 1 12-05-2007 02:51:57
Envio de mails turminator Internet 3 03-06-2006 00:51:58
Attachments en mails rsotolongo Internet 2 19-04-2004 07:10:48
E-mails con olor? jhonny Noticias 4 07-03-2004 22:23:45
Ver E-Mails html ¿? Adrix Internet 10 21-08-2003 21:36:10


La franja horaria es GMT +2. Ahora son las 12:08:56.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi