Jump to content
Fivewin Brasil

email


Alain da Silva

Recommended Posts

  • 6 months later...

Pessoal, não estou mais conseguindo enviar email usando a rotina Ricardo de Moura Marques, com o provedor uol. Só estou conseguindo enviar usando o terra.


Private aServs := { {"@hotmail.com", "smtp.live.com", 25, .t. },;

{"@yahoo.com.br", "smtp.mail.yahoo.com.br", 25, .f. },;

{"@gmail.com", "smtp.gmail.com", 465, .t. },;

{"@uol.com.br", "smtp.uol.com.br", 25, .f. },;

{"@bol.com.br", "smtp.bol.com.br", 25, .f. },;

{"@terra.com.br", "smtp.terra.com.br", 25, .f. },;

{"@ig.com.br", "smtp.ig.com.br", 465, .t. },;

{"@ibest.com.br", "smtp.ibest.com.br", 465, .t. },;

{"@itelefonica.com.br","smtp.itelefonica.com.br", 25, .f. },;

{"@pop.com.br", "smpt.pop.com.br", 25, .f. } }

id=code>id=code>

Tem alguma mudança na configuração.

Obrigado

Alain/Rancharia

XHarbour 0.99.71

FWHX 7.04 Workshop 4.5

Link to comment
Share on other sites

Pessoal, não estou mais conseguindo enviar email usando a rotina Ricardo de Moura Marques, com o provedor uol. Só estou conseguindo enviar usando o terra.


Private aServs := { {"@hotmail.com", "smtp.live.com", 25, .t. },;

{"@yahoo.com.br", "smtp.mail.yahoo.com.br", 25, .f. },;

{"@gmail.com", "smtp.gmail.com", 465, .t. },;

{"@uol.com.br", "smtp.uol.com.br", 25, .f. },;

{"@bol.com.br", "smtp.bol.com.br", 25, .f. },;

{"@terra.com.br", "smtp.terra.com.br", 25, .f. },;

{"@ig.com.br", "smtp.ig.com.br", 465, .t. },;

{"@ibest.com.br", "smtp.ibest.com.br", 465, .t. },;

{"@itelefonica.com.br","smtp.itelefonica.com.br", 25, .f. },;

{"@pop.com.br", "smpt.pop.com.br", 25, .f. } }

id=code>id=code>

Tem alguma mudança na configuração.

Obrigado

Alain/Rancharia

XHarbour 0.99.71

FWHX 7.04 Workshop 4.5

Link to comment
Share on other sites

Ola amigo, eu ja tinha mudado para 587 e 465, mas sem resultado. O programa avisa que não foi possível enviar nessa parte.


********************************************************************************

Function Envia_Mail(oCfg,cFrom, cTo, cCC, cBCC, cMsg, cSubject)

local cToken

local lRet := .f.

cTo := Destinatarios( cTo ) //--> PARA

cCC := Destinatarios( cCC ) //--> COM COPIA

cBCC := Destinatarios( cBCC ) //--> COM COPIA OCULTA

TRY

oMsg := CREATEOBJECT ( "CDO.Message" )

WITH OBJECT oMsg

:Configuration = oCfg

:From = cFrom

:To = cTo

:CC = cCC

:BCC = cBCC

:Subject = cSubject

:TextBody = cMsg

For x := 1 To Len( aAttach )

if aAttach[x] <> NIL

:AddAttachment(AllTrim(aAttach[x]))

endif

Next

:Send()

END WITH

lRet := .t.

CATCH

MsgInfo("Não Foi Possível enviar a mensagem. aqui")

lRet := .f.

END

Return lRet

id=code>id=code>

Alain/Rancharia

XHarbour 0.99.71

FWHX 7.04 Workshop 4.5

Link to comment
Share on other sites

Boa tarde!

Estou fazendo uma rotina para envio de arquivo xml de nota fiscal eletronica usando CDO.MESSAGE baseado nesta rotina e funciona para BOL/IBEST/HOTMAIL os demais não tive como testar, so que tenho alguns problemas não envia email em todas as maquinas, tive que desabilitar o antivirus e não consigo enviar varios email para destinatarios diferentes e de vez en quando ela não funciona, se alguem tiver uma ideia para me ajudar agradeço.

Frazato

Frazato

Link to comment
Share on other sites

citação:

Amigo.. pelo que eu tenho configurado aqui, acho que o UOL requer autenticação, então deveria ter um .T. na 4a. posição do teu vetor.. tu verificou isso?

Att.


id=quote>id=quote>

Everton - Chapecó-SC

XHB9971/FW612/MyMake/xDev/VRMM-Union/W7-64/@Say/JESUS/ESPOSA/3FILHOS

Link to comment
Share on other sites

Ola, sim, testei das duas formas e não deu certo.

{"@uol.com.br", "smtp.uol.com.br", 587, .f. },;

{"@uol.com.br", "smtp.uol.com.br", 587, .t. },;

e também

{"@uol.com.br", "smtps.uol.com.br", 587, .f. },;

{"@uol.com.br", "smtps.uol.com.br", 587, .t. },;

Alain/Rancharia

XHarbour 0.99.71

FWHX 7.04 Workshop 4.5

Editado por - boingo on 27/12/2012 15:35:23

Link to comment
Share on other sites

Aproveitando o topico e pedindo SOS para os amigos, ja que não entende esta parte de porta.

No meu fonte esta assim:


Private aServs := { {"@hotmail.com", "smtp.live.com", 25, .t. },;

{"@yahoo.com.br", "smtp.mail.yahoo.com.br", 25, .f. },;

{"@gmail.com", "smtp.gmail.com", 465, .t. },;

{"@uol.com.br", "smtps.uol.com.br", 465, .f. },;

{"@bol.com.br", "smtp.bol.com.br", 25, .f. },;

{"@terra.com.br", "smtp.terra.com.br", 25, .f. },;

{"@ig.com.br", "smtp.ig.com.br", 465, .t. },;

{"@ibest.com.br", "smtp.ibest.com.br", 465, .t. },;

{"@itelefonica.com.br","smtp.itelefonica.com.br", 25, .f. },;

{"@pop.com.br", "smpt.pop.com.br", 25, .f. } }

id=code>id=code>

SE ALGUEM PUDER AJUDAR, COMO É QUE FICA AS ALTERAÇÕES PARA ESTES SERVIDORES E SE TIVER MAIS ALGUM PARA ACRESCENTAR Jà MEU MUITO OBGDAO...

Perfil.jpg

Link to comment
Share on other sites

Rone o terra mudou a porta de 25 p/ 587 os outros não sei

Abs

citação:

Aproveitando o topico e pedindo SOS para os amigos, ja que não entende esta parte de porta.

No meu fonte esta assim:


Private aServs := { {"@hotmail.com", "smtp.live.com", 25, .t. },;

{"@yahoo.com.br", "smtp.mail.yahoo.com.br", 25, .f. },;

{"@gmail.com", "smtp.gmail.com", 465, .t. },;

{"@uol.com.br", "smtps.uol.com.br", 465, .f. },;

{"@bol.com.br", "smtp.bol.com.br", 25, .f. },;

{"@terra.com.br", "smtp.terra.com.br", 25, .f. },;

{"@ig.com.br", "smtp.ig.com.br", 465, .t. },;

{"@ibest.com.br", "smtp.ibest.com.br", 465, .t. },;

{"@itelefonica.com.br","smtp.itelefonica.com.br", 25, .f. },;

{"@pop.com.br", "smpt.pop.com.br", 25, .f. } }

id=code>id=code>

SE ALGUEM PUDER AJUDAR, COMO É QUE FICA AS ALTERAÇÕES PARA ESTES SERVIDORES E SE TIVER MAIS ALGUM PARA ACRESCENTAR Jà MEU MUITO OBGDAO...

Perfil.jpg


id=quote>id=quote>

Reneu M. Garcia - Catanduva - SP

Link to comment
Share on other sites

  • 2 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...