Página 1 de 2
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 00:30
por fladimir
não funciona dá erro CO_E_ClassString ai percebi q era pq estava sem o arquivo CDOSYS.DLL, mas não encontro CDOSYS.DLL para Windows 2003 Server.
Pelo q li parece q não tem mesmo somente até Windows Server 2000 e depois a partir do Windows Server 2008, tipo deixando esta lacuna aparente no Windows Server 2003...
Vou ter q contornar isto, pq já tentei pegar CDONT.zip (arquivos do Windows 2000) e utilizar no 2003, mesmo registrando com regsvr32 e os nomes das Dlls não funciona.
Então minha ideia é ... indentificar SO se Windows 2003 Server vou ter q executar outra forma de envio de e-mail pelo Harbour sem ser CDOSYS.... alguma sugestão?
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 08:28
por asimoes
Fladimir,
Uma alternativa seria usar tip_MailSend
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 09:42
por fladimir
Vlw Alexandre vou pesquisar sobre ele.
obrigado.
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 10:11
por Kapiaba
Bom dia Fladimir, veja isto:
http://forums.fivetechsupport.com/viewt ... il#p191454
Tem os links para baixar a dll e a lib, qualquer coisa, avise que tenho no meu 4shared.
Testei, e funciona perfeito.
Abs.
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 11:49
por asimoes
Fladimir,
Eu tenho uma classe de envio de email usando tip_ mailsend se precisar, publico aqui.
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 12:51
por janio
Q-U-E-R-E-M-O-S!
Funciona com Hotmail na porta 587?
Janio
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 14:27
por asimoes
Olá Jânio,
Acredito que sim, eu uso com gmail.
Segue exemplo de uso, código da classe em anexo.
(*) As dll´s no zip tem que estar na mesma pasta do executável.
Código: Selecionar todos
oEmail:=ClEmailSSL():New()
oEmail:cUser :="xhbsistemas"
oEmail:cPassword :="xxxxx"
oEmail:cFrom :="xhbsistemas@gmail.com"
oEmail:cAlias :="Sistema AsaPrev <"+oEmail:cFrom+"> "
oEmail:aTo :={"Alexandre Simäes <asimoesluz@gmail.com>"}
oEmail:aCC :={"Alexandre Simäes <a_1964_luz@yahoo.com.br>"}
oEmail:cHost :="smtp.gmail.com"
oEmail:cAssunto :="Log de erro de sistema em: "+hb_DtoC(Date(),"DD/MM/YYYY")
oEmail:cMensagem :="Log de erro de sistema em: "+hb_DtoC(Date(),"DD/MM/YYYY")+' V.SSL <br>'+cHtmlErro
oEmail:aArquivo :=aArq
oEmail:cUrlImagem:='https://lh3.googleusercontent.com/-QVwBnkr04oA/Vp0Pa7miUII/AAAAAAAABBg/jh0iCxs2bMA/s279-Ic42/ASAPREV1.PNG'
oEmail:nPorta :=465
oEmail:lSSL :=(oEmail:nPorta == 465)
oEmail:Send()
IF oEmail:lRet
hwg_MsgInfo("Erro enviado ao analista", "Sistema AsaPrev")
ENDIF
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 15:14
por fladimir
Vlw Galera.... Vlw Janio Alexandre João (Kapiaba)....
Já sei q vai funcionar p a restrição é somente ao CDO... não testei mas tenho 99% de certeza... os outros 1% volto pra atestar a teoria assim q tiver os resultados.
[]'s
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 15:24
por asimoes
Exemplo do email que eu recebo:
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 15:45
por janio
Até onde sei, nem tip_ mailsend e nem CDO funcionam com a porta 587 (que exige conexao TLS)
Hotmail funciona na porta 25 ou 587. O problema eh que alguns provedores de internet bloqueia a porta 25
Janio
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 16:01
por asimoes
Sabendo destas restrições, porque não usar o GMAIL?
Comigo funciona 100%
Acho que no GMAIL, se não me engano tem alguma coisa para encaminhar email, que pode ser hotmail
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 19:27
por JoséQuintas
Até onde sei, nem tip_ mailsend e nem CDO funcionam com a porta 587 (que exige conexao TLS)
Hotmail funciona na porta 25 ou 587. O problema eh que alguns provedores de internet bloqueia a porta 25
Tá precisando se atualizar.
Uma notícia que tá quase completando 4 anos, sobre o fim da porta 25.
https://canaltech.com.br/noticia/segura ... egra-5480/
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 19:28
por asimoes
Olhei o fonte da tip_ mailsend, e vi que tem esse trecho:
IF oInMail:OpenSecure( , lSSL )
lAuthTLS := oInMail:lTLS
Isso significa que trabalha com TLS
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 19:38
por JoséQuintas
O que sempre esquecem é o seguinte:
Apenas como exemplo:
Eu baixo os fontes do Harbour, e gero o Harbour, usando msvc.
Isso não permite enviar e-mails do gmail, porque a parte necessária para uso do gmail não faz parte do Harbour, é algo adicional.
Lógico, como não uso gmail, nunca me preocupei em mexer nisso.
Tá ai uma boa oportunidade pra descobrir o que precisa ser instalado.
Inclusive se vai precisar instalar alguma DLL no cliente pra poder funcionar.
O mesmo sobre pra libcurl, porque poderia ser substituta pro msxml5 que não faz parte do Windows, e precisa pra NFE, CTE e MDFE.
Depende de instalar alguma coisa no cliente pra funcionar?
Nota: Quanto ao email pelo Harbour, funciona normalmente.
Email CDOSYS no Windows Server 2003
Enviado: 19 Out 2016 22:34
por janio
Quintas,
Que a porta 25 foi (deveria ter sido) bloqueada, isso eu sei! Ocorre que alguns provedores de internet NÃO FIZERAM ESSE BLOQUEIO! Daí a porta 25 continuar funcionando para o hotmail!
JUSTAMENTE por saber disso, que essa porta (25) deveria ter sido bloqueada, eh que ESTOU PROCURANDO SOLUÇÃO PARA EMISSAO DE EMAIL PELA PORTA 587 (com TSL)! Até agora essa solução eu não encontrei, nem mesmo no harbour 3.4!
Tenho no sistema a opcao de emissão de email! O cliente cadastra os seus dados (email, senha) e envia relatorios, nfe... por email! Se chego num cliente que o seu email eh do hotmail, tenho enfrentado problemas de alguns funcionar (porta 25 liberada), e outros nao (porta 25 bloqueada)! Para os provedores que tem a porta 25 bloqueada, a solução seria usar a 587, so que nessa porta eh obrigatorio o uso do TSL. Repito: NÃO HA SOLUÇÃO (ainda) PARA ESSE PROBLEMA NO HARBOUR!
Estou atualizadíssimo!
:xau