Como Puxar e-mails

[helio1361303486]

Alguém sabe como ler, ou fazer o download do arquivo que esta em anexo em um e-mail?

com o Stmp consegue-se enviar e-mails. mas gostaria de puxa-los via fwh, tem como ?

Com a funcão abaixo, dá pra saber quantos e-mails tem na conta. TEM COMO PEGAR ESSES E-MAILS ?

function ReadEmails( oInMail )

local n

MsgInfo( "Total emails: " + Str( Len(oInMail:aMsgs ) ) )

for n = 1 to Len( oInMail:aMsgs )

MsgInfo( oInMail:aMsgs[ n ] )

next

return nil

Grato,

Hélio

xHarbout 0.99.71/WS/PELLESC

[helio1361303486]

Alguém sabe como ler, ou fazer o download do arquivo que esta em anexo em um e-mail?

com o Stmp consegue-se enviar e-mails. mas gostaria de puxa-los via fwh, tem como ?

Com a funcão abaixo, dá pra saber quantos e-mails tem na conta. TEM COMO PEGAR ESSES E-MAILS ?

function ReadEmails( oInMail )

local n

MsgInfo( "Total emails: " + Str( Len(oInMail:aMsgs ) ) )

for n = 1 to Len( oInMail:aMsgs )

MsgInfo( oInMail:aMsgs[ n ] )

next

return nil

Grato,

Hélio

xHarbout 0.99.71/WS/PELLESC

[elitenet]

Para o que você quer voce tera que usar a classe TPop3, veja os metodos da mesma que voce vai encontrar o que precisa.

Marcelo Gomes

elitenet@terra.com.br

(32) 3728-1288

Muriae - MG

FW 2.3C/FWH 2.6/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

[Kbelo]

http://www.fivewin.com.br/exibedicas.asp?id=466

http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=6502

Marcelo Michels

marcelo@infototal.com.br

"Total Informatica"

V Encontro de Fivewin - Novembro 2007id=red>

Eu Apoio, se vou ai só Deus sabe.