- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED
×
Linguagem de Programação ADVPL
Perguntas ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED
- robertomiguel
- Autor do Tópico
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 7
- Obrigados Recebidos: 0
9 anos 8 meses atrás #24916
por robertomiguel
ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED foi criado por robertomiguel
ERRO: [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED ACCOUNT DOES NOT EXSIST.
OBS: quando envio o relatório padrão vai normal. A conta está configurada no SIGACFG, e está indo normal, porém esse que é personalizado não vai, Mesmo eu usando os mesmos parâmetros da conta.
também ja tentei passando os parametros direto CONNECT SMTP SERVER GETMV ("MV_RELSERV");
Account GETMV ("MV_RELACNT");
Password GETMV ("MV_RELPSW"); mas mesmo assim não vai e dá o mesmo erro: ERRO: [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED ACCOUNT DOES NOT EXSIST
segue bloco de e-mail:
Static Function MEmail()
********************************************************
...
_cCONTEUDO := 'Conforme solicitado, segue infomações para análise em anexo.'
cServer := "smtp.dominio.com.br:587"
_cAccount := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
_cpassword:= "*******"
If Alltrim(cUserName) == "user1"
_usermail := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
Endif
If Alltrim(cUserName) == "user2"
_usermail := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
Endif
If xFilial("AB3") == "02"
_cAssunto := "AAAAAAAAAAAAAAA*AAAAAAAAAAAAAAAAAAA - No.: "+_cOrc
Endif
If xFilial("AB3") == "04"
_cAssunto := "BBBBBBBBBBBBBBB*BBBBBBBBBBBBBBBBBBB - No.: "+_cOrc
Endif
CRLF := chr(13)+chr(10)
_cCONTEUDO := ""
_cCONTEUDO += '<html>'
_cCONTEUDO += '<head>'
_cCONTEUDO += '<b><font size="2" Color="#FF0000" face="Arial">Segue em anexo, PRÉ-ORÇAMENTO APROVADO E ASSINADO PELA GERENCIA.'+'</font></b>'
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '<b><font size="2" Color="#FF0000" face="Arial">'+MSMM(AB4->AB4_MEMO)+'</font></b>'
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '<b><font size="2" Color="#000080" face="Arial"> Informado por: ' + Alltrim(cUserName) + '</font></b>'
_cCONTEUDO += '</body>' + CRLF
_cCONTEUDO += '</html>' + CRLF
Endif
CONNECT SMTP SERVER cServer;
Account _cAccount;
Password _cpassword;
RESULT _lOK ;
IF!(_lOK)
ConOut("Não foi possível conectar Servidor de e-mail")
return nil
end if
IF !MailAuth(_cAccount,_cpassword)
ConOut("Não foi possível conectar Servidor de e-mail")
disconnect smtp server RESULT _lOK
ENDIF
send mail from _usermail;
to _emailcliente;
cc _usermail;
subject _cAssunto;
body _cCONTEUDO;
attachment aFiles
disconnect smtp server
Return
OBS: quando envio o relatório padrão vai normal. A conta está configurada no SIGACFG, e está indo normal, porém esse que é personalizado não vai, Mesmo eu usando os mesmos parâmetros da conta.
também ja tentei passando os parametros direto CONNECT SMTP SERVER GETMV ("MV_RELSERV");
Account GETMV ("MV_RELACNT");
Password GETMV ("MV_RELPSW"); mas mesmo assim não vai e dá o mesmo erro: ERRO: [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED ACCOUNT DOES NOT EXSIST
segue bloco de e-mail:
Static Function MEmail()
********************************************************
...
_cCONTEUDO := 'Conforme solicitado, segue infomações para análise em anexo.'
cServer := "smtp.dominio.com.br:587"
_cAccount := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
_cpassword:= "*******"
If Alltrim(cUserName) == "user1"
_usermail := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
Endif
If Alltrim(cUserName) == "user2"
_usermail := "Este endereço de email está sendo protegido de spambots. Você precisa do JavaScript ativado para vê-lo."
Endif
If xFilial("AB3") == "02"
_cAssunto := "AAAAAAAAAAAAAAA*AAAAAAAAAAAAAAAAAAA - No.: "+_cOrc
Endif
If xFilial("AB3") == "04"
_cAssunto := "BBBBBBBBBBBBBBB*BBBBBBBBBBBBBBBBBBB - No.: "+_cOrc
Endif
CRLF := chr(13)+chr(10)
_cCONTEUDO := ""
_cCONTEUDO += '<html>'
_cCONTEUDO += '<head>'
_cCONTEUDO += '<b><font size="2" Color="#FF0000" face="Arial">Segue em anexo, PRÉ-ORÇAMENTO APROVADO E ASSINADO PELA GERENCIA.'+'</font></b>'
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '<b><font size="2" Color="#FF0000" face="Arial">'+MSMM(AB4->AB4_MEMO)+'</font></b>'
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '</tr>' + CRLF
_cCONTEUDO += '<b><font size="2" Color="#000080" face="Arial"> Informado por: ' + Alltrim(cUserName) + '</font></b>'
_cCONTEUDO += '</body>' + CRLF
_cCONTEUDO += '</html>' + CRLF
Endif
CONNECT SMTP SERVER cServer;
Account _cAccount;
Password _cpassword;
RESULT _lOK ;
IF!(_lOK)
ConOut("Não foi possível conectar Servidor de e-mail")
return nil
end if
IF !MailAuth(_cAccount,_cpassword)
ConOut("Não foi possível conectar Servidor de e-mail")
disconnect smtp server RESULT _lOK
ENDIF
send mail from _usermail;
to _emailcliente;
cc _usermail;
subject _cAssunto;
body _cCONTEUDO;
attachment aFiles
disconnect smtp server
Return
Por favor Acessar ou Registrar para participar da conversa.
- admin
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 216
- Obrigados Recebidos: 0
9 anos 8 meses atrás #24920
por admin
Respondido por admin no tópico ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED
Vc esta mandando anexo neste email ?
senão retire esta linha
attachment aFiles
senão retire esta linha
attachment aFiles
Por favor Acessar ou Registrar para participar da conversa.
- robertomiguel
- Autor do Tópico
- Desconectado
- Membro Iniciado
-
Menos
Mais
- Postagens: 7
- Obrigados Recebidos: 0
9 anos 8 meses atrás #24926
por robertomiguel
Respondido por robertomiguel no tópico ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED
Sim tem anexo.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- ERRO NO ENVIO DE E-MAIL. [ERROR][SERVER][SOCKCLINET]ERROR 67 - THE RCPT COMMAND FAILED.THE SPECIFIED
Tempo para a criação da página:0.101 segundos