envio de boleto por email utilizando cobrebem

Delphi

02/06/2010

Boa tarde galera, estou utilizando o gerenciador de boletos Cobrebemx,
não estou conseguindo enviar o boleto por email de jeito nenhum
já segui o manual mais eu naõ consigo enviar.

acho que estou preenchendo as configurações errado.
se alguem souber como funciona ou tiver um exemplo ai para enviar pra mim,
será de uma ajuda muito grande.

desde já agradeço a atenção de todos.
João Pereira

João Pereira

Curtidas 0

Respostas

João Pereira

João Pereira

02/06/2010

pesquisando na internet encontrei isso dai e funcionou
só que só nos servidor smtp que não utilizam TSL
talvez sirva pra alguem que procure
atéh


declarando as variáveis
Boleto, Cobrebemx, EmailSacado : variant;

CobreBemX := CreateOleObject('CobreBemX.ContaCorrente');
CobreBemX.ArquivoLicenca := CobreBem.dataSet.FieldByName('ARQUIVOLICENCA').asString;

Boleto := CobreBemX.DocumentosCobranca.Add;

CobreBemX.PadroesBoleto.PadroesBoletoEmail.SMTP.Servidor := smtp.gmail.com
CobreBemX.PadroesBoleto.PadroesBoletoEmail.SMTP.Porta := 25 ou 587 (já testei as duas)
CobreBemX.PadroesBoleto.PadroesBoletoEmail.SMTP.Usuario := conta email da gmail;
CobreBemX.PadroesBoleto.PadroesBoletoEmail.SMTP.Senha := senha do conta do gmail acima;
CobreBemX.PadroesBoleto.PadroesBoletoEmail.URLImagensCodigoBarras := Endereço na web com as imagens;
CobreBemX.PadroesBoleto.PadroesBoletoEmail.URLLogotipo := Endereço na web com a imagem;
CobreBemX.PadroesBoleto.PadroesBoletoEmail.PadroesEmail.Assunto := 'qualquer um'
CobreBemX.PadroesBoleto.PadroesBoletoEmail.PadroesEmail.EmailFrom.Endereco := conta email da gmail;
CobreBemX.PadroesBoleto.PadroesBoletoEmail.PadroesEmail.EmailFrom.Nome := 'fulano'
CobreBemX.PadroesBoleto.PadroesBoletoEmail.PadroesEmail.FormaEnvio := feeSMTPBoletoHTML;

EmailSacado := Boleto.EnderecosEmailSacado.Add;
EmailSacado.Nome := 'Nome do cliente'
EmailSacado.Endereco := email do cliente;

Boleto.ControleProcessamentoDocumento.EnviaEmail := scpExecutar;
CobreBemX.EnviaBoletosPorEmail;
GOSTEI 0
João Pereira

João Pereira

02/06/2010

ahh se alguem descobrir como enviar o email com estes servidores que utilizam
TSL / SSL podem postar ai a forma que será de grande utilidade pra mim.
ainda preciso implementar isso no meu sistema

Desde já agradeço!
GOSTEI 0
João Pereira

João Pereira

02/06/2010

segue uma lista como os servidores smtp que usam e não usam o TSL/SSL;

http://superlogica.com/faq/00259
GOSTEI 0
POSTAR