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

    [Resolvido]Print do Form e enviar por email

    Compartilhe

    Kelson Davisson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 02/03/2017

    [Resolvido]Print do Form e enviar por email

    Mensagem  Kelson Davisson em 11/6/2018, 16:26

    Galera tenho um formulário e queria que na hora que clicasse no botão salvar, o mesmo retirasse o print do formulário e colasse no outlook para envio do email. Grato da atenção e ajuda.
    avatar
    Maicon
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 119
    Registrado : 08/09/2012

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  Maicon em 12/6/2018, 07:46

    "http://www.maximoaccess.com/t33531-copiar-um-relatorio-em-formato-txt-para-area-de-transferencia"

    Basicamente mesma coisa, porem escolha pdf ou xps.



    .................................................................................
    "Uma pessoa que nunca cometeu um erro, nunca tentou nada novo."
    Albert Einstein

    Bons Estudos.

    Kelson Davisson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3
    Registrado : 02/03/2017

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  Kelson Davisson em 12/6/2018, 12:44

    Ola amigos não sei se fui bem claro não estou querendo enviar via email o relatório, estou é querendo capturar a tela do formulário ai sim enviar por email.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 12/6/2018, 13:14

    Olá a todos,

    Kilson, o mais simples era criar um relatório com a mesma informação do form para enviar.

    Em foto, fica mais pesado para o envio por email.
    No entanto se pretende dessa forma veja link abaixo para fazer a captura e salvar em ficheiro:

    social.technet.microsoft.com/wiki/contents/articles/23860.print-screen-to-an-image-using-access-vba.aspx

    Para enviar por email, pode ser como o colega exemplificou, se pretende automáticamente não falta exemplos no fórum, será fazer uma "Busca".

    Abraço a todos
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10116
    Registrado : 04/11/2009

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  JPaulo em 12/6/2018, 15:22

    Assim serve ?

    Código:
    DoCmd.SendObject acSendForm, "SeuFormulario", acFormatPDF, "", "", "", "teste", "teste"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

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

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10116
    Registrado : 04/11/2009

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  JPaulo em 12/6/2018, 16:10

    Ou assim, um pouco mais complexo;

    Download


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

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

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 19/6/2018, 16:24

    Olá a todos,

    Kelson Araujo, como ficou a situação?
    Os membros do fórum merecem e agradecem o retorno.

    Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
    [Você precisa estar registrado e conectado para ver este link.]

    Abraço a todos

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 20/6/2018, 01:53

    Boa noite, JPaulo.

    Daria pra mandar o exemplo em .mdb (2003)

    Obrigado.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10116
    Registrado : 04/11/2009

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  JPaulo em 20/6/2018, 15:05

    Ola

    Desculpe de só ver agora o seu pedido;

    Em Ms Access 2003:
    Download


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

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

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

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

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 20/6/2018, 19:12

    Boa tarde, JPaulo.

    Sem problemas, amigo.

    Muito obrigado.

    Um exemplo perfeito.

    Eu gostaria de saber se tem como em vb passar para jpg o formulário todo, não apenas a parte visível da tela que é o que o Print screen faz(usando a tela toda), como também esse seu exemplo (usando o form em foco.).
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 20/6/2018, 22:50

    Olá a todos,

    Grande JPaulo, ficou um excelente exemplo.

    Leoni Dias, altere a extensão de .JPG para .BMP na parte do código abaixo e teste:
    Código:
    'salva a imagem do form
    SalvaImagem (CurrentProject.Path & "\MeuForm_" & Format(Now, "ddmmyyyyhhmmss") & ".jpg")

    Kelson Araujo, como ficou a situação?
    Os membros do fórum merecem e agradecem o retorno.

    Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
    [Você precisa estar registrado e conectado para ver este link.]

    Abraço a todos

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 20/6/2018, 23:26

    Boa noite.

    Agora me perdi todo.

    Quer dizer que muando a extensão de JPG para BMP será salvo no pc e enviado para o email o formulário completo e não apenas a parte visível na tela?

    Entendi não.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 20/6/2018, 23:42

    Olá, desculpe fiz confusão com a pergunta.

    Para isso desconheço, vamos ver se algum colega ajuda, ou amanha analiso melhor o codigo e vejo como ajudar.

    Abraço a todos

    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 25/6/2018, 16:19

    Olá Leoni Dias,

    Veja se é o pretendido.

    Abraço
    Anexos
    PrintScreen_Opcional_e_anexa_ao_Outlook_2003.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (39 Kb) Baixado 14 vez(es)

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 25/6/2018, 21:18

    Boa tarde, Ahteixeira.

    Obrigado por sua ajuda, mas não bem isso não. Eu queria a transformação do form para JPG, mas o form completo, Mão a tela toda.

    No exemplo existem a duas opções, mas em uma o form principal aparece todo porque é pequeno e na outra transforma a tela toda.

    O que eu queria é transformar o form principal todo, sem corte da tela em um JPG, assim como o office 2007 (infelizmente não consegui fazer dessa forma do 22007 no 2003) faz com o form quando o transforma em PDF.

    Mesmo assim, obrigado novamente.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 26/6/2018, 00:29

    Olá Leoni Dias,

    Acho que só mesmo criando PDF como JPaulo exemplificou.
    Será que podria ser um SnaoShot, veja tópico abaixo:
    [Você precisa estar registrado e conectado para ver este link.]

    Pode aplicar a mesma técnica a form.

    Abraço

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 26/6/2018, 01:26

    Boa noite.

    Infelizmente tentei de todas as formas mas o acOutputForm e acFormatSNP não está funcionando, mesmo com o Snapviewer instalado.

       DoCmd.OutputTo acOutputForm, "frm_teste", _
       acFormatSNP, Application.CurrentProject.Path & "\Teste.snp", True
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 27/6/2018, 12:28

    Olá Leoni Dias,

    Tive oportunidade de testar no 2003 e 2010 e não funciona sendo um Form.
    Estranho, pois na documentação diz que permite.
    msdn.microsoft.com/en-us/library/office/aa220433(v=office.11).aspx

    Vamos ver se mais algum colega pode ajudar.
    Abrçao
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10116
    Registrado : 04/11/2009

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  JPaulo em 27/6/2018, 12:39

    1º Abra o seu formulario em modo de estrutura.
    2º Vá em cima do lado esquerdo a "File" ou "Ficheiro"
    3º Save Object As
    4º Escolha "Report" ou "Relatório"

    Desta forma fica com um relatório igual ao seu formulario, pode até deletar os botões se existirem.
    Quando necessitar de exportar para Snapshot faça-o para o relatório e não formulário.

    Mil maneiras de fazer nestum.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

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

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

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

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 27/6/2018, 14:35

    Bom dia a todos os amigos que sempre ajudam muito.

    Eu acredito que vou ter que apelar para uma impressora pdf  virtual de terceiros.
    Já fiz os testes e funciona bem melhor do que eu esperava.

    O problema, JPaulo, é que meus forms se baseiam em cconsultas que são realizadas colocando dados no próprio form, na hora, através de controles de texto, Listbox e outros. O relatório não funciona dessa forma.

    Tentei no access 2007... a conversão para o pdf sai perfeita, porém são muitos os problemas com os forms que são baseados em consulta e quando eu faço o Applifilter de um registro, não consigo fazer mais (mesmo colocando a origem do form em tabela e não em consulta). Acredito que como depois da consulta de um registro específico o filtro, como tem apenas esse registro, não consiga procurar outro.

    Mas valeu. Entre mortos e feridos, salvaram-se todos. São muitas as mudanças que eu teria que fazer para apenas para não usar uma impressora virtual, é preferível usar o software externo.

    Novamente, obrigado.

    Ps. Coisas do ruindows: diz que a conversão do form para o snap funciona e só funciona para relatório.

    leoni_dias
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 125
    Registrado : 14/08/2011

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  leoni_dias em 28/6/2018, 00:23

    Boa noite a todos.

    Problemas resolvidos e de uma forma que eu não esperava depois da decepção com o access 2007.

    Instalei o runtime do access 2010 e reconheceu o mdb do 2003 sem nenhuma restrição ou problemas maiores,isso tudo sem eu precisar transformar no formato do 2010.

    Obrigado a todos.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido]Print do Form e enviar por email

    Mensagem  ahteixeira em 28/6/2018, 08:11

    Olá Leoni Dias, que bom que resolveu.

    O Access 2003 já não tem suporte do fabricante, será uma otima oportunidade passar a usar numa versão mais recente.

    Obrigado pelo retorno.

    Abraço a todos

      Data/hora atual: 25/9/2018, 04:50