nelson costa

o componente ACBR consegue enviar para nota carioca XML com acentuação. ? e no caso , assinar tambem o XML ?

Resolvido o Problema: estou usando agora a função MAIL_ConfigGravarValor( para setar os parametros, um a um. a função MAIL_ConfigLer para ler o arquivo INI, definitivamente NAO FUNCIONA. Era ESSE o problema. Obrigado a todos pela atenção.

segue o LOG, dessa vez usando a ULTIMA versao ACBrLibMail-20230106.zip

segue o LOG ACBrLibMail-20230104.zip

04/01/23 10:09:24:931 - LIB_Inicializar( d:\MailTeste.ini, ) 04/01/23 10:09:24:931 - ACBrLibMail - 0.1.8.276 04/01/23 10:10:29:652 - LIB_Inicializar( d:\MailTeste.ini, ) 04/01/23 10:10:29:652 - ACBrLibMail - 0.1.8.276 04/01/23 10:15:51:333 - TLibMailConfig.AplicarConfiguracoes: d:\MailTeste.ini 04/01/23 10:15:51:333 - Travar 04/01/23 10:15:51:334 - TLibMailConfig.AplicarConfiguracoes - Feito 04/01/23 10:15:51:334 - Destravar 04/01/23 10:15:51:334 - TLibMailConfig.Ler - Feito 04/01/23 10:15:51:334 - Destravar 04/01/23 10:15:51:334 - TACBrLibMail.Inicializar - Feito 04/01/23 10:15:51:334 - LIB_Inicializar( d:\MailTeste.ini, ) 04/01/23 10:15:51:334 - ACBrLibMail - 0.1.8.276 04/01/23 10:15:51:340 - MAIL_AddAddress( [email protected], ) 04/01/23 10:15:51:341 - Travar 04/01/23 10:15:51:343 - SetRetorno(0, ) 04/01/23 10:15:51:344 - Destravar 04/01/23 10:15:51:345 - MAIL_SetSubject( teste do sistema ) 04/01/23 10:15:51:345 - Travar 04/01/23 10:15:51:346 - SetRetorno(0, ) 04/01/23 10:15:51:346 - Destravar 04/01/23 10:15:51:346 - MAIL_AddReplyTo( [email protected], ) 04/01/23 10:15:51:347 - Travar 04/01/23 10:15:51:347 - SetRetorno(0, ) 04/01/23 10:15:51:347 - Destravar 04/01/23 10:15:51:347 - MAIL_AddBody( simples teste[CR][LF] ) 04/01/23 10:15:51:348 - Travar 04/01/23 10:15:51:348 - SetRetorno(0, ) 04/01/23 10:15:51:348 - Destravar 04/01/23 10:15:51:349 - MAIL_Send 04/01/23 10:15:51:350 - Travar 04/01/23 10:16:11:714 - Destravar 04/01/23 10:16:11:715 - SetRetorno(-10, SMTP Error: Unable to send MailFrom. 530 5.7.57 Client not authenticated to send mail. Error: 535 5.7.3 Authentication unsuccessful [ROAP284CA0216.BRAP284.PROD.OUTLOOK.COM]) 04/01/23 10:16:11:717 - LIB_UltimoRetorno 04/01/23 10:16:11:718 - MoverStringParaPChar. StrLen:173, BufLen:1024 04/01/23 10:16:11:718 - Codigo:-10, Mensagem:SMTP Error: Unable to send MailFrom.[CR][LF]530 5.7.57 Client not authenticated to send mail. Error: 535 5.7.3 Authentication unsuccessful [ROAP284CA0216.BRAP284.PROD.OUTLOOK.COM]

bom, hoje 04.01, consegui enviar e-mail normalmente pelo TESTE , então está funcionando. a rotina pela DLL é que não funciona, então creio que sejam codigos diferentes.

peguei aqui. a DLL na pasta stdcall e o o OPENssl na pasta Dep.

[Email] [email protected] FromName=Fulano de Tal Host=smtp.office365.com Port=587 [email protected] Pass=<oculta> TLS=1 SSL=0 DefaultCharset=27 IdeCharset=15 Nome=teste Servidor=smtp.office365.com [email protected] [email protected] Senha=<oculta> Codificacao=27 Porta=587 Timeout=0 Confirmacao=0 ConfirmacaoEntrega=0 SegundoPlano=0 Tentativas=1 IsHTML=0 Priority=1 [Principal] TipoResposta=0 CodificacaoResposta=0 LogNivel=1 LogPath=d:\ [Versao] ACBrLib=0.0.2 ACBrLibMail=0.1.8.276 ACBrLibMail Demo=0.1.8.278 [Sistema] Nome= Versao= Data=30/12/1899 Descricao= [PosPrinter] ArqLog= Modelo=0 Porta= PaginaDeCodigo=2 ColunasFonteNormal=48 EspacoEntreLinhas=0 LinhasEntreCupons=21 CortaPapel=1 TraduzirTags=1 IgnorarTags=0 LinhasBuffer=0 ControlePorta=0 VerificarImpressora=0 TipoCorte=0 [PosPrinter_Barras] MostrarCodigo=0 LarguraLinha=0 Altura=0 Margem=0 [PosPrinter_QRCode] Tipo=2 LarguraModulo=4 ErrorLevel=0 [PosPrinter_Logo] IgnorarLogo=0 KeyCode1=32 KeyCode2=32 FatorX=1 FatorY=1 [PosPrinter_Gaveta] SinalInvertido=0 TempoON=50 TempoOFF=200 [PosPrinter_MPagina] Largura=0 Altura=0 Esquerda=0 Topo=0 Direcao=0 EspacoEntreLinhas=0 [PosPrinter_Device] Baud=9600 Data=8 Timeout=3 Parity=0 Stop=0 MaxBandwidth=0 SendBytesCount=0 SendBytesInterval=0 HandShake=0 SoftFlow=0 HardFlow=0 [Proxy] Servidor= Porta=0 Usuario= Senha= [SoftwareHouse] CNPJ= RazaoSocial= NomeFantasia= WebSite= Email= Telefone= Responsavel= [Emissor] CNPJ= RazaoSocial= NomeFantasia= WebSite= Email= Telefone= Responsavel=

Nao estou conseguindo enviar e-mail com TLS , o estranho é que pelo TESTE, eu consigo se problemas, mas fazendo pela DLL nao funciona. a dll do OPENSSL está com a ultima versao. o estranho é que o arquivo INI quando feito pela DLL , é incluido diversos campos, e pede para cadastrar o SMTP em outro campo nao entendi porque num funciona e o outro nao. segue meu programa de teste em foxpro CLEAR #Define STR_LEN 256 #Define STR_TO_UTF8 9 #Define UTF8_TO_STR 11 DECLARE integer MAIL_Inicializar IN ACBrMail32.dll String eArqConfig, string eChaveCrypt DECLARE integer MAIL_ConfigLer IN ACBrMail32.dll String eArqConfig DECLARE integer MAIL_AddAddress IN ACBrMail32.dll String eEmail,string eNome DECLARE integer MAIL_SetSubject IN ACBrMail32.dll String eSubject DECLARE integer MAIL_AddReplyTo IN ACBrMail32.dll String eEmail,string eNome DECLARE integer MAIL_AddBody IN ACBrMail32.dll String eAltBody DECLARE integer MAIL_Send IN ACBrMail32.dll integer UseThreadNow DECLARE integer MAIL_UltimoRetorno IN ACBrMail32.dll string @sMensagem,long @esTamanho DECLARE integer MAIL_ConfigGravar IN ACBrMail32.dll string @sMensagem ? px("","") ? mail_configLer("d:\MailTeste.ini") ? MAIL_AddAddress("[email protected]","") ? MAIL_SetSubject("teste do sistema") ? MAIL_AddReplyTo("[email protected]","") ? MAIL_AddBody("simples teste") *? mail_configgravar("d:\SAIDA.INI") ? "send",MAIL_Send(0) ret=SPACE(200) ? "ultimo retorno",MAIL_UltimoRetorno(@ret,1024) ? "ret",ret FUNCTION px(arqConfig, chaveCrypt) local hResult, buffer, bufferLen, oErr arqConfig = Iif(Vartype(arqConfig)#"C", "", arqConfig) chaveCrypt = Iif(Vartype(chaveCrypt)#"C", "", chaveCrypt) hResult = MAIL_Inicializar(StrConv(arqConfig, STR_TO_UTF8), StrConv(chaveCrypt, STR_TO_UTF8)) ? hresult ENDFUNC

Nao estou conseguindo enviar e-mail com TLS , o estranho é que pelo TESTE, eu consigo se problemas, mas fazendo pela DLL nao funciona. a dll do OPENSSL está com a ultima versao. o estranho é que o arquivo INI quando feito pela DLL , é incluido diversos campos, e pede para cadastrar o SMTP em outro campo nao entendi porque num funciona e o outro nao. segue meu programa de teste em foxpro CLEAR #Define STR_LEN 256 #Define STR_TO_UTF8 9 #Define UTF8_TO_STR 11 DECLARE integer MAIL_Inicializar IN ACBrMail32.dll String eArqConfig, string eChaveCrypt DECLARE integer MAIL_ConfigLer IN ACBrMail32.dll String eArqConfig DECLARE integer MAIL_AddAddress IN ACBrMail32.dll String eEmail,string eNome DECLARE integer MAIL_SetSubject IN ACBrMail32.dll String eSubject DECLARE integer MAIL_AddReplyTo IN ACBrMail32.dll String eEmail,string eNome DECLARE integer MAIL_AddBody IN ACBrMail32.dll String eAltBody DECLARE integer MAIL_Send IN ACBrMail32.dll integer UseThreadNow DECLARE integer MAIL_UltimoRetorno IN ACBrMail32.dll string @sMensagem,long @esTamanho DECLARE integer MAIL_ConfigGravar IN ACBrMail32.dll string @sMensagem ? px("","") ? mail_configLer("d:\MailTeste.ini") ? MAIL_AddAddress("[email protected]","") ? MAIL_SetSubject("teste do sistema") ? MAIL_AddReplyTo("[email protected]","") ? MAIL_AddBody("simples teste") *? mail_configgravar("d:\SAIDA.INI") ? "send",MAIL_Send(0) ret=SPACE(200) ? "ultimo retorno",MAIL_UltimoRetorno(@ret,1024) ? "ret",ret FUNCTION px(arqConfig, chaveCrypt) local hResult, buffer, bufferLen, oErr arqConfig = Iif(Vartype(arqConfig)#"C", "", arqConfig) chaveCrypt = Iif(Vartype(chaveCrypt)#"C", "", chaveCrypt) hResult = MAIL_Inicializar(StrConv(arqConfig, STR_TO_UTF8), StrConv(chaveCrypt, STR_TO_UTF8)) ? hresult ENDFUNC