informax Posted May 4, 2022 Report Share Posted May 4, 2022 Bom dia a Todos. Alguém tem alguma forma de enviar email via Linha de Comando , pois tentei com o Blat.exe e com o SwithMail.exe. O Blat eu já usei há muitos anos atrás e hoje dá erro e o SwithMail diz que ´SwithMail´ não é conhecido como um comando interno. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 4, 2022 Report Share Posted May 4, 2022 Desculpe a ignorância, mas o que é email via linha de comando? Explique desenhando... kkkkkkkk, tô meio loira hoje. Abs. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
vailtom Posted May 4, 2022 Report Share Posted May 4, 2022 Olá, O blat.exe funciona bem, que erro voce está obtendo? Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 4, 2022 Report Share Posted May 4, 2022 47 minutos atrás, vailtom disse: Olá, O blat.exe funciona bem, que erro voce está obtendo? Desculpe amado Mestre, mas eu prefiro o RMAIL.PRG - Bom para kraliyus(). Não tem igual kkkkkkkkkkkkkkkkkk Abraços. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
rochinha Posted May 4, 2022 Report Share Posted May 4, 2022 Amiguinhos, Também uso o Blat e inclusive ele pode ser utilizado via DLL. Apresente o LOG com erro que você está recebendo. Quote Link to comment Share on other sites More sharing options...
vailtom Posted May 5, 2022 Report Share Posted May 5, 2022 19 horas atrás, kapiaba disse: Desculpe amado Mestre, mas eu prefiro o RMAIL.PRG - Bom para kraliyus(). Não tem igual kkkkkkkkkkkkkkkkkk Abraços. Regards, saludos Fala João querido, Sim, eu também prefiro usar via código mesmo... É que via linha de comando é util para alguns outros cenários. kapiaba 1 Quote Link to comment Share on other sites More sharing options...
informax Posted May 5, 2022 Author Report Share Posted May 5, 2022 Em 04/05/2022 at 16:58, kapiaba disse: Desculpe amado Mestre, mas eu prefiro o RMAIL.PRG - Bom para kraliyus(). Não tem igual kkkkkkkkkkkkkkkkkk Abraços. Regards, saludos. Boa noite Kapiaba. Pode me instrui a baixar o RMAIL.PRG, pois tentei e não consegui. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 6, 2022 Report Share Posted May 6, 2022 13 horas atrás, informax disse: Boa noite Kapiaba. Pode me instrui a baixar o RMAIL.PRG, pois tentei e não consegui. Tá na mão: https://mega.nz/file/FQFWgIDT#kvRtIHIesRpTw9I8CxJenTRikG4VXM0t_7J8qVQsOX8 Abs. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
Marca Posted May 6, 2022 Report Share Posted May 6, 2022 cCmd := oPub:wPathRaiz + 'SwithMail.exe /s ' cCmd += '/From "' + cFrom + '" ' // Email do Remetente _cUserEmail cCmd += '/Name "' + cFrom + '" ' // Nome do Remetente que esta enviando pode se repetir o email acima cCmd += '/Pass "' + cSenhaEnvio + '" ' // Senha cCmd += '/Server "' + cMailServer + '" ' // Smtp cCmd += '/P "' + AllTrim(Str(nPort,4)) + '" ' IF lSSL cCmd += '/Ssl ' ENDIF cCmd += '/To "' + AllTrim(_cTo) + '" ' IF !Empty(_cComCopia) cCmd += '/cc "' + AllTrim(_cComCopia) + '" ' ENDIF IF !Empty(cCopiaoCulta) cCmd += '/bcc "' + cCopiaoCulta + '" ' ENDIF cCmd += '/Sub "' + AllTrim(_cSubject) + '" ' IF !Empty( cAttach ) cCmd += '/A "' + AllTrim(cAttach) + '" ' ENDIF * Assim seria com um Html * cCmd += '/b "' + cMensagem + '" ' // + '"/html ' // Com ou sem o html caso inclua nao é encaminhado os anexos IF File(oPub:wPathSys + "TRACEMAIL.ARQ") cCmd += '/l "' + oPub:wPathSys + 'EmailLog.log' + '" ' ENDIF IF !Empty( cArqMens ) cCmd += '/Btxt "' + cArqMens + '" ' ENDIF IF File(oPub:wPathSys + "TRACEMAIL.ARQ") cArqErros := oPub:wPathRaiz + "EMAIL" + AllTrim(Str(Day(Date()))) + AllTrim(Str(Month(Date()))) + ".LOG" IF File( cArqErros ) FErase( cArqErros ) ENDIF cListErr := MemoRead(cArqErros) cListErr += cCmd MemoWrit(cArqErros, cListErr) ENDIF * achaerro( cCmd ) lRetMail := MyRun( cCmd ) FErase( cArqMens ) CursorArrow() IF !lRetMail MsgStop( "Não foi possível enviar a mensagem para " + AllTrim(_cTo), "Atenção" ) ENDIF Quote Link to comment Share on other sites More sharing options...
btsinfo@com4.com.br Posted August 29, 2022 Report Share Posted August 29, 2022 Em 06/05/2022 at 07:52, kapiaba disse: Tá na mão: https://mega.nz/file/FQFWgIDT#kvRtIHIesRpTw9I8CxJenTRikG4VXM0t_7J8qVQsOX8 Abs. Regards, saludos. Bom dia Kapiaba Para usar o Rmail tem que configurar Outlook? Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 29, 2022 Report Share Posted August 29, 2022 3 minutos atrás, btsinfo@com4.com.br disse: Bom dia Kapiaba Para usar o Rmail tem que configurar Outlook? Bom dia. NÃO, ele é para enviar via CDO. Para isto basta ter um provedor de EMAILS, tipo: uol, bol, terra, ig, "grobo", etc. Para Outlook, tem exemplos no forum. Abs. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
rochinha Posted August 29, 2022 Report Share Posted August 29, 2022 Amiguinhos, O CDO é tecnologia obsoleta que a Microsoft retirou de algumas versões do Windows. Ela era muito forte nas versões Server, se não funcionar no seu Windows não será falha do programa mas sim falta de suporte do S.O. SendEmail Exemplo de uso da Blat.DLL: Citar function blatEmail( cbody ,; cserver ,; cto ,; cf ,; csubject ,; cu ,; cpw ,; cattach, lHtml, portSMTP, lSendBack ) lHtml := .t. BlatCMD := [ blat.txt] + ; [ -to ] + alltrim(cto) + ; [ -server ] + alltrim(cserver) + ; [ -mailfrom ] + alltrim(CL_Email) + ; [ -subject "] + alltrim(csubject) + ["] + ; [ -r ] + ; [ -replyto ] + alltrim(lower(iif(lSendBack,CL_Email,cu))) + ; [ -returnpath ] + alltrim(CL_Email) + ; iif(!empty(cu),[ -u ] + alltrim(lower(cu)),"") + ; iif(!empty(cpw),[ -pw ] + alltrim(cpw),"") + ; iif(!empty(portSMTP),[ -portSMTP ] + portSMTP, "" ) + ; [ -log "email.log" -debug ] + ; iif( lHtml, [ -html ], [] ) if empty( cAttach ) else if ValType( cAttach ) == "A" BlatCMD := BlatCMD + [ -attach "] + alltrim(cAttach[ 1 ]) + ["] For nEle := 2 To Len( cAttach ) BlatCMD := BlatCMD + [,"] + alltrim(cAttach[ nEle ]) + ["] Next else BlatCMD := BlatCMD + [ -attach "] + alltrim(cAttach) + ["] endif endif if lHtml cBody := FormHtml( cSubject, cBody ) + "Email enviado usando BLAT.DLL" endif rMemoWrit( "blat.txt", cbody ) fErase( "email.log" ) BlatLOG := Send( BlatCMD ) SysWait(2) if file( "email.log" ) BlatLOG := memoread( "email.log" ) if "ERROR" $ Upper(BlatLOG) MemoEdit( BlatLOG ) return .f. endif if "535" $ Upper(BlatLOG) MsgStop( "Erro: Authentication Failed" + CRLF + CRLF + "Senha/Login de autenticacao com erro." ) return .f. endif endif RETURN .T. DLL32 FUNCTION Send( sBlatString AS STRING ) AS LONG PASCAL ; FROM "Send" LIB "Blat.dll" DLL32 FUNCTION SendB( sBlatString AS STRING ) AS LONG ; // PASCAL ; FROM "SendBlat" LIB "Blat.dll" DLL32 FUNCTION BlatSend( BlatCMD AS STRING ) AS LONG ; // PASCAL; FROM "Send" LIB "Blat.dll" Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 29, 2022 Report Share Posted August 29, 2022 Como disse o Rochinhasssss, em alguns provedores de Emails(novos), esse efeito colateral, pode ocorrer, más nos que eu citei acima, eu corto um dedo do Rochinhasssss, se não funcionar. Funciona de boas... Más vai que.... kkkkkkkkkkkkkkkkkkkkkkkkkkk Abs. Regards, saludos. rochinha 1 Quote Link to comment Share on other sites More sharing options...
EDUTEK Posted August 29, 2022 Report Share Posted August 29, 2022 uso swithMail.exe sem problemas rochinha 1 Quote Link to comment Share on other sites More sharing options...
Jorge Andrade Posted September 1, 2022 Report Share Posted September 1, 2022 Em 29/08/2022 at 14:32, kapiaba disse: Como disse o Rochinhasssss, em alguns provedores de Emails(novos), esse efeito colateral, pode ocorrer, más nos que eu citei acima, eu corto um dedo do Rochinhasssss, se não funcionar. Funciona de boas... Más vai que.... kkkkkkkkkkkkkkkkkkkkkkkkkkk Abs. Regards, saludos. João, lembra das apostas do Juca Kfura, quando ele apostava! Ele falava "Eu corto um braço se o curintia não ganhar hoje", eu não sei quantos braços ele cortou, as vc tá igual a ele, só tirou o seu da reta né safado. ahahahaha apostando braços Quote Link to comment Share on other sites More sharing options...
rochinha Posted September 2, 2022 Report Share Posted September 2, 2022 Amiguinhos, Citar só tirou o seu da reta né safado. ahahahaha Se não tirar não é o João. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 2, 2022 Report Share Posted September 2, 2022 Em 29/08/2022 at 15:56, EDUTEK disse: uso swithMail.exe sem problemas kkkkkkkkkkkkkkkkkkkkkkkkkk, Jorge, pimenta no KU dos outros, é Refresh(). kkkkkkkkk Edutek, onde eu encontro isso e como é que se usa? Podeis dar um exemplo práctico para nós meros mortais que não temos o seu nível de conhecimento? Obg. abs. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
rochinha Posted September 2, 2022 Report Share Posted September 2, 2022 Amiguinhos, veja este link a explicação ou procure nas mensagens aqui mesmo, pois creio que postei também. Baixe deste link. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 2, 2022 Report Share Posted September 2, 2022 14 minutos atrás, rochinha disse: Amiguinhos, veja este link a explicação ou procure nas mensagens aqui mesmo, pois creio que postei também. Baixe deste link. Rochianhassss, Sua conexão não é particular Invasores podem estar tentando roubar suas informações de www.pctoledo.com.br (por exemplo, senhas, mensagens ou cartões de crédito). Saiba mais NET::ERR_CERT_COMMON_NAME_INVALID Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 2, 2022 Report Share Posted September 2, 2022 Você se referia a esse link? http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=10764&p=120883&hilit=swithMail#p120883 Ou este? http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=10764&p=120886&hilit=swithMail#p120886 Ou é a mesma coisa, sei lá.... kkkkkkkkkkkkkkkkkkkkkkkkkkkkkk Regards, saludos. Quote Link to comment Share on other sites More sharing options...
Jorge Andrade Posted September 2, 2022 Report Share Posted September 2, 2022 4 horas atrás, kapiaba disse: kkkkkkkkkkkkkkkkkkkkkkkkkk, Jorge, pimenta no KU dos outros, é Refresh(). kkkkkkkkk Edutek, onde eu encontro isso e como é que se usa? Podeis dar um exemplo práctico para nós meros mortais que não temos o seu nível de conhecimento? Obg. abs. Regards, saludos. Isso tá parecendo aquela piada do português na cadeia, que delatou o outro preso ao carcereiro, dizendo que ele "Estava a fugir aos poucos", pq, todos os dias, ele jogava um pedaço dele pra fora pela janela, só que, ele não sabia que, o cara era leproso. ahahahahahaha Quote Link to comment Share on other sites More sharing options...
rochinha Posted September 2, 2022 Report Share Posted September 2, 2022 Amiguinhos, Citar Ou é a mesma coisa, sei lá.... kkkkkkkkkkkkkkkkkkkkkkkkkkkkkk Kôdeloko! Vou mandar o Ratinho fazer o teste de DNA para saber qual dos dois é o pai. Mas son las mismas cosas. 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.