Exibindo arquivos em PDF pelo Access
Ficou muito fácil configurar o Access 2007/2010 para a exibição de arquivos em PDF, bastanto para tanto, utilizar o controle ActiveX do Adobe Reader.
Para que o ActiveX funcione é necessário que você tenha instalado na sua máquina o software Adobe Acrobate Reader.
Abra um formulário no modo estrutura e selecione o botão ActiveX na guia design da ribbon.
Selecione da lista a opção Adobe PDF Reader e clique em OK.
O quadro do Reader é carregado no formulário.
Observe o código abaixo, utilizado no exemplo que disponibilizo, que no evento "Ao abrir" do formulário, defino o tamanho do quadro e chamo pela função que carrega o arquivo PDF no ActiveX.
Private Sub Form_Open(Cancel As Integer)
'Dimensiono a tela do PDF para 22 x 15.5cm Me.AcroPDF0.Width = 568 * 22 Me.AcroPDF0.Height = 568 * 15.5
'carrega o artigo 1 Call fncCarregaPdf
'entrega o foco para o botão 1 Me!bt1.SetFocus End Sub
------------------------------------------------------------------------------
Private Sub fncCarregaPdf(Optional j As Byte = 0) Dim origem As String On Error Resume Next
'gravo na variável o local que se encontra os arquivos PDF
origem = CurrentProject.Path & "\artigos\"
Select Case j
Case 0 'botão 1
Me!AcroPDF0.LoadFile origem & "artigo1.pdf" 'carrega artigo 1 no ActiveX
Case 1 'botão 2
Me!AcroPDF0.LoadFile origem & "artigo2.pdf"
Case 2 'botão 3
Me!AcroPDF0.LoadFile origem & "artigo3.pdf"
End Select
End Sub
Veja o resultado de um dos artigos sendo carregado no formulário:
Os dez artigos mais visitados
MontaRibbons v3.1 - Assistente completo para criar ribbons no Access
Utilizando Classe no Access - Introdução
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Criando Ribbons parte 1 - Conhecendo a estrutura Xml
Vídeo - Segurança máxima, usando o OPEN
DVD - Coletânea de artigos, vídeos e exemplos do site
Vídeo - Manutenção e Sistema de Backup com Barra de Progresso
Vinculando tabelas com barra de progresso ( front-end x back-end )
Vídeo - Criando Ribbons parte 4 - Imagens externas em pasta local
Gerar relatórios em pdf e enviar por email
|
2 comentário(s) Marcelo 19/8/2010 13:45:02 olá avelino gostei muito do artigo, mas vem cá, lá aonde define altura e largura, se colocasse direto em twips não se ganharia alguns microssegundos no carregamento do pdf? imagino que da forma que voce coloca o access irá gastar micronesimos de segundo calculando antes para depois abrir ou não? se essa teoria estiver certa talvez em pcs menos robustos isso possa fazer uma maior diferença. o que tu diz? Avelino Sampaio 20/8/2010 10:34:35 Marcelo, testei num caidinho que tenho aqui e sinceramente, não achei que compremeteu não. Grato pela sua participação. |