DonJuan Posted June 26, 2012 Report Share Posted June 26, 2012 Para quem tiver interesse em desenvolver algum sistema nesta área, esta ai um material para pesquisa!! http://www.avelsistemas.com/download.php?file=20 Acesse: http://www.avelsistemas.com FHW 11.12, XHB1.2.1, PELLESC 6.5, XDEV 7.2, FASTREPORT, SQLRDD, MySql, Firebird, Postgres "MIGRE SEUS SISTEMAS EM CLIPPER PARA 32BITS COM BANCOS SQL" Quote Link to comment Share on other sites More sharing options...
DonJuan Posted June 26, 2012 Report Share Posted June 26, 2012 Para quem tiver interesse em desenvolver algum sistema nesta área, esta ai um material para pesquisa!! http://www.avelsistemas.com/download.php?file=20 Acesse: http://www.avelsistemas.com FHW 11.12, XHB1.2.1, PELLESC 6.5, XDEV 7.2, FASTREPORT, SQLRDD, MySql, Firebird, Postgres "MIGRE SEUS SISTEMAS EM CLIPPER PARA 32BITS COM BANCOS SQL" Quote Link to comment Share on other sites More sharing options...
Alain da Silva Posted December 27, 2012 Author Report Share Posted December 27, 2012 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 Quote Link to comment Share on other sites More sharing options...
Alain da Silva Posted December 27, 2012 Author Report Share Posted December 27, 2012 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 Quote Link to comment Share on other sites More sharing options...
netsys Posted December 27, 2012 Report Share Posted December 27, 2012 Ola Alain Não seria aquela mudança da porta 25 para 587 ? Abs Alberto - SP Quote Link to comment Share on other sites More sharing options...
Alain da Silva Posted December 27, 2012 Author Report Share Posted December 27, 2012 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 lRetid=code>id=code>Alain/Rancharia XHarbour 0.99.71 FWHX 7.04 Workshop 4.5 Quote Link to comment Share on other sites More sharing options...
Frazato Posted December 27, 2012 Report Share Posted December 27, 2012 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 Quote Link to comment Share on other sites More sharing options...
evertonl Posted December 27, 2012 Report Share Posted December 27, 2012 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. Quote Link to comment Share on other sites More sharing options...
evertonlb Posted December 27, 2012 Report Share Posted December 27, 2012 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 Quote Link to comment Share on other sites More sharing options...
Alain da Silva Posted December 27, 2012 Author Report Share Posted December 27, 2012 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 Quote Link to comment Share on other sites More sharing options...
miragerr Posted December 27, 2012 Report Share Posted December 27, 2012 Ola amigos Na realidade não é 587 e sim 465 tenta ai Espero ter ajudado Jackson Douglas Boa Vista FWH 12.02 Lamborguini ( isso voa gente ) PellesC+xH 1.2.1 + FAST REPORT + DBFCDX + SQL 100% email : miragerr@osite.com.br MSN : jackson_rl@hotmail.com SKYPE : jackson_rr Quote Link to comment Share on other sites More sharing options...
Alain da Silva Posted December 28, 2012 Author Report Share Posted December 28, 2012 Bom dia a todos, como o amigo Jackson mostrou. Configuração correta e funcionando. {"@uol.com.br", "smtps.uol.com.br", 465, .t. } Obrigado Alain/Rancharia XHarbour 0.99.71 FWHX 7.04 Workshop 4.5 Quote Link to comment Share on other sites More sharing options...
Theotokos Posted December 28, 2012 Report Share Posted December 28, 2012 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... Quote Link to comment Share on other sites More sharing options...
reneumg Posted December 28, 2012 Report Share Posted December 28, 2012 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... id=quote>id=quote>Reneu M. Garcia - Catanduva - SP Quote Link to comment Share on other sites More sharing options...
rubensma Posted December 29, 2012 Report Share Posted December 29, 2012 Rone, conforme o Alain informou acima, acerte o seu uol {"@uol.com.br", "smtps.uol.com.br", 465, .t. } é .T. nos demais também não posso ajudar abraços Rubens Martins rumarti@gmail.com FWH 6.12 + xHARBOUR + Workshop Quote Link to comment Share on other sites More sharing options...
Theotokos Posted December 29, 2012 Report Share Posted December 29, 2012 Ok! Obgdao! Acertei o do UOL. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 4, 2013 Report Share Posted March 4, 2013 {"@uol.com.br", "smtps.uol.com.br", 465, .T. },; Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.