MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


3 participantes

    Enviar dados de um registro atual no corpo do e-mail

    avatar
    Mozarth321
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 13/03/2016

    Enviar dados de um registro atual no corpo do e-mail Empty Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Mozarth321 Qui 20 Set - 11:42

    Boa tarde pessoal

    Preciso enviar os dados de uma tabela diretamente no corpo do e-mail, pois quem recebe precisa colocar o valor do serviço no corpo do e-mail e me devolve sem ter que abrir anexos. Procurei aqui no fórum mas só encontrei exemplos que colocados os dados como anexo (relatório, PDF, Excel, etc).

    Por favor alguém pode me ajudar? minha intenção é colocar um botão no formulário contínuo para disparar esse e-mail com alguns dados do registro atual

    muito obrigado

    Mozarth
    avatar
    Ricardo Monteiro
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 27/11/2017

    Enviar dados de um registro atual no corpo do e-mail Empty Re: Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Ricardo Monteiro Qui 20 Set - 12:28

    1. Configure o outlook para usar o endereço eletrônico que quer utilizar para enviar o email.
    2. No editor do VBA Ative a biblioteca de referências do Outlook (Microsoft Outlook xx.0 Object Library).
    Adapte o seguinte código para a sua necessidade:

    Código:
    'Código Criado por Ricardo Freitas Monteiro - Projetos de desenvolvimento? Msg para +55 61 98608-3665
    Dim objEmail As Outlook.MailItem
    Set objEmail = Outlook.Application.CreateItem(olMailItem)
    With objEmail
        .To = <<Campo do formulario que contém os emails para quem você quer enviar (tipo de dados string)>>
        .Subject = <<Assunto do email (tipo de dados string)>>
        .Body = <<O(s) campo(s) que contém os dados que você quer enviar (tipo de dados string)>>
        .Send
    End With
    Set objEmail = nothing
    avatar
    Mozarth321
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 13/03/2016

    Enviar dados de um registro atual no corpo do e-mail Empty Re: Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Mozarth321 Sex 21 Set - 13:20

    Obrigado pela ajuda, mas o e-mail que vai enviar deve ser o e-mail do usuário que esta utilizando o banco no momento, não é um usuário fixo, então como configurar o item 1 das instrução que me enviou?
    avatar
    Ricardo Monteiro
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 50
    Registrado : 27/11/2017

    Enviar dados de um registro atual no corpo do e-mail Empty Re: Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Ricardo Monteiro Sex 21 Set - 13:42

    Se os usuários que utilizam o banco estão em computadores diferentes, este código supre a sua necessidade. Pois ele cria um e-mail e envia com o e-mail padrão cadastrado no outlook. Nesta caso, para cada computador, você deverá configurar o outlook com o email do usuário.

    Caso sejam vários usuários no mesmo computador, adicione dentro do bloco with a propriedade .SenderEmailAddress = "emaildousuário@qualquercoisa.com"

    Você pode declarar uma variável do tipo string e informar o email do usuário via inputbox ou formulário, mas o ideal é ter uma tebela com os dados dos usuários e o sistema consultar o email do usuário logado nesta tabela.


    .................................................................................
    Ricardo Freitas Monteiro
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    Enviar dados de um registro atual no corpo do e-mail Empty Re: Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Avelino Sampaio Dom 23 Set - 7:11

    Olá!

    Veja se este meu artigo também te ajuda (copie e cole o endereço abaixo no seu navegador).

    usandoaccess.com.br/dicas/outlook-anexos-richtext-account.asp


    Bom estudo!

    Conteúdo patrocinado


    Enviar dados de um registro atual no corpo do e-mail Empty Re: Enviar dados de um registro atual no corpo do e-mail

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 21 Nov - 19:07