MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Botão para Envio de Relatório por Email

    Compartilhe

    Eldorado
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 17/05/2017

    Botão para Envio de Relatório por Email

    Mensagem  Eldorado em Ter 30 Maio 2017, 6:37 pm

    Olá pessoal, sou novo aqui no fórum e tenho uma dúvida com relação ao envio de um determinado relatório por email, através de botão.
    Pois bem, levando em consideração o código abaixo:

    DoCmd.SendObject acSendReport, "RLT_ORDEM", acFormatPDF, "emaildestino", "seuemail", "", "assunto", "mensagem", 0

    Gostaria de saber o seguinte:

    - é possivel que ao inserir um determinado endereço de email numa caixa de texto, o email seja enviado para esse respectivo endereço?
    Pelo que entendi o código acima só nos permite enviar email para o endereço ja pré-estabelecido pelo código.

    Espero que possa ter me expressado de maneira que todos possam entender, e me desculpem qualquer erro, pois sou novo aqui no fórum.

    Jefe
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4402
    Registrado : 15/03/2013

    Re: Botão para Envio de Relatório por Email

    Mensagem  ahteixeira em Qua 31 Maio 2017, 8:53 am

    Olá Jefe (Eldorado), Bem-Vindo ao fórum.

    Não falta exemplos no fórum, já experimentou a "Busca" aqui do fórum, veja como fazer:
    [Você precisa estar registrado e conectado para ver este link.]

    Qualquer coisa estamos cá para ajudar.
    Abraço

    Antonio Tavares
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 15
    Registrado : 22/02/2013

    Re: Botão para Envio de Relatório por Email

    Mensagem  Antonio Tavares em Qua 31 Maio 2017, 5:30 pm

    Boa tarde Jefe,

    Tens aqui um exemplo de como enviar como anexo,

    [Você precisa estar registrado e conectado para ver este link.]

    ou podes também inserir relatório no corpo do email conforme exemplo que anexo.

    No campo .To só tens que indicar a tua textbox.

    .To = Me.tuatextbox

    Cumprimentos,
    Anexos
    EnviaNoCorpoDoEmail.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (56 Kb) Baixado 26 vez(es)

      Data/hora atual: Seg 25 Set 2017, 9:48 am