Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Mrweb

Ler emails que retornaram na queue

Recommended Posts

Boa tarde galera, tenho um sistema de newsletter e atualmente envio 135 mil emails diariamente, o problema e que gostaria de fazeum uma limpeza no banco de dados com emails que retornam.Como posso ler os dados da pasta de retorno dos emails e montar uma lista?Alguem sabe como listar e ler os arquivos no server?Tipo c:\inetpub\mailroot\queue?Tipo via fso?ObrigadoMrweb

Compartilhar este post


Link para o post
Compartilhar em outros sites

Alguem já usou?

http://www.system-engine.com/EmiaCtrlLite.shtml

 

Preciso de algumas dicas pra pegar somente o subject e o endereço do remetente.

 

Seguindo o exemplo do site da pau de regexp

 

O que pode ser?

 

O exemplo é esse.

 

 

<html><head>pop3 list</head><body><table width="90%" border="1" align="center"><%dim mailserver,port,id,pass,mailer,listmailserver = "mail.host.com"port = 110id = "usrname"pass = "*****************"Set mailer = Server.CreateObject("EmiaLITE.SendRetrieve")mailer.set_POP3 mailserver,port,id,passlist = mailer.get_list'use Regular Expressions to search and replace "<" with "<" and ">" with ">"dim r1,r2Set r1 = new regexpr1.Pattern = "<"Set r2 = new regexpr2.Pattern = ">"for each line in listdim datalineif r1.Test(line.From) = true thenline.From = r1.Replace(line.From,"<")end ifif r2.Test(line.From) = true thenline.From = r2.Replace(line.From,">")end ifdataline = line.From+"||"+line.Subject+"||"+line.Size+"||"+line.Number+"||"+line.Date+"||"+line.AttachResponse.Write("<tr>")dim datadata = split(dataline,"||")for each piece in dataResponse.Write("<td>"+piece+"</td>")nextResponse.Write("</tr>")next%></table></body></html>
Alem de registrar a dll é necessário mais alguma coisa?

Os outros exemplos rodam perfeito.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.