Início![[Resolvido]enviar relatório por e-mail Empty](https://2img.net/i/empty.gif)
poy 19/10/2012, 13:48Preciso enviar um relatório por e-mail para um usuário que não tem Access.
Na versão 2007 é possivel gerar relatório em PDF ?
Existe outra opção?
Na versão 2007 é possivel gerar relatório em PDF ?
Existe outra opção?
[Resolvido]enviar relatório por e-mail
poy- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 71
Registrado : 10/01/2012
Convidado- Convidado
Bom dia Poy... Este assunto ja foi exaustivamente abordado no Fórum.
Na minha assinatura ai abaixo há um link para busca no Fórum.
De uma pesquisada sobre CDOSys.. ou Enviar e-mail etc...
Este código a seguir exporta um relatório em PDF.Observe que se tiver uma caixa texto ou uma variável que esteja carregada com o nome do cliente podes utilizá-la no mesmo.
'Exporta o relatório para a pasta relatório em modo PDF
DoCmd.OutputTo acOutputReport, "NomedoSeuRelatorioNoSistema", "PDFFormat(*.pdf)", CurrentProject.Path & "\PastaOndeSeráSalvo\" & Variável ou NomedaCaixaTexto & Format(Now, "dd-mm-yyyy") & ".pdf", False, "", 0, acExportQualityScreen
Cumprimentos.
Na minha assinatura ai abaixo há um link para busca no Fórum.
De uma pesquisada sobre CDOSys.. ou Enviar e-mail etc...
Este código a seguir exporta um relatório em PDF.Observe que se tiver uma caixa texto ou uma variável que esteja carregada com o nome do cliente podes utilizá-la no mesmo.
'Exporta o relatório para a pasta relatório em modo PDF
DoCmd.OutputTo acOutputReport, "NomedoSeuRelatorioNoSistema", "PDFFormat(*.pdf)", CurrentProject.Path & "\PastaOndeSeráSalvo\" & Variável ou NomedaCaixaTexto & Format(Now, "dd-mm-yyyy") & ".pdf", False, "", 0, acExportQualityScreen
Cumprimentos.
poy- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 71
Registrado : 10/01/2012
Grande Piloto ! Muito obrigado pela ajuda
Convidado- Convidado
O Fórum agradece o retorno.