[Resolvido]Exportação de relatório para pdf com falha de segurança

Olá amigos;

Depois de terminar o meu software como podem ver pelo link do vídeo que eu partilhei convosco, (Vídeo), deparei com um erro crasso em todos os relatórios.

Os utilizadores não têm acesso às tabelas nem ao código e nem podem ter. Entram com o nome de utilizador e palavra passe, e depois trabalham sem ter acesso às tabelas e controlos do programa.

Só que nos relatórios eu deixo uma porta aberta para que possam mexer no código.

Passo a explicar:

Em todos os relatórios há a possibilidade de exportar como pdf e escolher a pasta para guardar.

Mas se cancelarem a exportação, têm a hipótese de entrar no código através a opção” debug”.

O código que tenho é:    DoCmd.OutputTo acOutputReport, "Rt_ListaDeUtilizadores", acFormatPDF

Versão: Access 2019 x86

Partilho as imagens na ordem certa para poderem ver.

1ª: Mostra o relatório com o botão para exportar.

https://drive.google.com/file/d/1ra7GLUnPcO_UHAJpofEsLukaOYqFhTPG/view?usp=share_link

2ª: Mostra o código utilizado.

https://drive.google.com/file/d/1DBHky-T72igLqHcbm3Ysu9_I7kk516tT/view?usp=share_link

3ª Aparece a opção para escolher a pasta.

https://drive.google.com/file/d/1P5I7gyPA2BChZbgaToKUcBZ3xPkoUCIW/view?usp=share_link

4ª Se cancelar a exportação, aparece a opção para o debug.

https://drive.google.com/file/d/11fTk95iUlLN1Od9SK8bl2eSG_GTrOzVh/view?usp=share_link

5ª O VBA é aberto para a correção e é aqui que está o problema. O código VBA é exposto.

https://drive.google.com/file/d/1WC15usl_YbQRa1AvbWQkWBie8kZXFRW8/view?usp=share_link

Por favor podem orientar-me na melhor forma de fazer a exportação para pdf?

Obrigado
Joaquim

Boa tarde Joaquim.
Para o sistema não entrar direto no VBA quando não imprimir coloque o seguinte;

Código:

DoCmd.SetWarnings False
     DoCmd.OutputTo acOutputReport, "Rt_ListaDeUtilizadores", acFormatPDF
DoCmd.SetWarnings True

Olá amigo.
Antes ou depois do código que tenho?

No evento ao clcar do botão você coloca todos os códigos dentro dele
somente os codigo do botão

Obrigado. Vou fazer isso mais logo e reporto aqui.

Boa noite;

Com o código que me enviou, abre na mesma uma janela, para o utilizador dar o ok para a exportação em pdf. O problema é que se o utilizador cancelar, aparece outra janela onde pode fazer o debug e aí, entra no código.

Eu não tinha nenhuma macro no software. Todos os botões estão configurados com código.

Agora vou alterar os botões para macros e isso já não vai acontecer.

Mesmo o botão para imprimir, que imprime direto, se não houver uma impressora instalada no pc, aparece a janela para o debug.

O meu objetivo de não ter macros, era para o cliente poder usar o Access runtime. Só que eu tenho lido que ao trabalhar com o runtime, as macros podem dar problemas.

Confesso que depois de todo o trabalho que tive, não contava com estes contratempos.

Vou então configurar com macros e digo ao cliente que tem de ter o office 2019 instalado no sistema, para não correr riscos.

Obrigado pela ajuda.

Joaquim

Como assim? Porque se não tiver nenhuma impressora instalada ele usa a impressora virtual que já é formatada direto em PDF.
Da uma pesquisada aí.
Sucesso.

Cada um dos 60 relatórios que tenho no programa, tem 4 botões, como pode confirmar na bd que eu anexei.

1) Exportar para PDF:
Código: DoCmd.OutputTo acOutputReport, "Rt_DevolucaoPorFornecedor", acFormatPDF

2) Imprimir direto:
Código: DoCmd.OpenReport "Rt_DevolucaoPorFornecedor", acViewNormal

3) Pré Visualizar a impressão:
Código: DoCmd.OpenReport " Rt_DevolucaoPorFornecedor ", acViewPreview
             DoCmd.Maximize

4) Fechar o relatório:
Código: DoCmd.Close

Ao exportar para pdf, abre uma janela para confirmação. Se cancelar aparece a janela para o debug.

Ao imprimir direto, se não tiver uma impressora abre uma janela que dá a mesma oportunidade de accessar o código vba.

Criei duas macros:

Uma para exportar para pdf e a outra para imprimir. Desta forma, fecho a porta nos botões para que não apareça forma de ver o código.

Um abraço
Joaquim

Boa noite.
Nem deu tempo, cheguei agora, mas ja está resolvido.
Não use essas macros, futuramente vai te trazer problemas.
Em anexo
Sucesso....

Bom dia grande amigo.

O ditado é antigo:
- quem sabe, sabe.

Só tive de criar primeiro a pasta denominada "Relatorio" no disco C, porque o código não cria a pasta e abre a janela para escolher, ficando com a hipótese de cancelar e entrar no debug.

Que Deus o abençoe a si e a todos aqueles que através deste Fórum são uma bênção para o seu próximo na partilha de conhecimento.

Bem Haja.

Joaquim

Amém.
Agradecemos o retorno
Louvado seja Deus.
Sucesso.