Discussion :

[manudja]

Comment ouvrir et lire un fichier au format pdf avec visual basic

[Smashou]

si d'après ce que j'ai compris tu souhaite dans un programme pouvoir ouvrir un fichier PDF et le lire il te faut utiliser le .OCX de Acrobat Reader qui se trouve il me semble uniquement dans la version 5 ( je ne suis pas completement sur de ceci)

Cordialement,



Smashou

[ProgElecT]

Chemin ou trouver l'outil, si il n'est pas dans la boite '' Composants, controles"

bouton Parcourir....
C:\Program Files\Adobe\Acrobat 7.0\ActiveX\AcroPDF.DLL

Il doit maintenant ce trouver dans la liste des contoles sous
Adobe Acrobat 7.0 Browser Control Type Library 1.0

Dans l'explorateur d'objet, bibliothéque "AcroPDFLiBCtl" le controle est nommé AcroPDF
Dans le programme, pour ouvrir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

AcroPDF1.LoadFile "c:\MonDossier\MonFichier.PDF"

Salut

[manudja]

une erreur s'affiche lorque j'essaie d'ouvrir le fichier PDF.
Quelle instruction faudrait mettre pour éviter cette erreur et permetre la lecture du fichier

j'ai ajouté la référence à la bibliothèque et j'ai défini au debut du code une variable.
Dim PDF As AcroPDFLib.AcroPDF

Dans mon code j'ai : PDF1.loadfile NOMFICHIER
Erreur 91
Variable Objet ou variable bloc with non défini

[AlainTech]

Dim PDF As AcroPDFLib.AcroPDF

PDF1.loadfile NOMFICHIER

Dim PDF puis utiliser PDF1...

Ca risque pas trop de marcher.

[ProgElecT]

SUITE .....

Sur une Form mettre
deposer 1 commandButton
deposer 1 AcroPDF1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Form_Load()
AcroPDF1.Visible = False
Command1.Left = 60: Command1.Top = 60
Command1.Height = 345: Command1.Width = 1425
Command1.Caption = "Ouvrir"
AcroPDF1.Left = 30: AcroPDF1.Top = 540
Me.WindowState = vbMaximized
End Sub
Private Sub Form_Resize()
AcroPDF1.Height = Me.Height - AcroPDF1.Top - 420
AcroPDF1.Width = Me.Width - 210
End Sub
Private Sub Command1_Click()
AcroPDF1.Visible = False
AcroPDF1.LoadFile "c:\Manual-11gUSB.pdf"
AcroPDF1.Visible = True
End Sub

Chez moi sa fonctionne trés bien (VB6 sous XP familliale)

[Invité]

Salut,

Le plus simple est d'utiliser l'API Shell Execute, une ligne de saisie et elle ouvre ton fichier PDF

Je n'ai pas la syntaxe en tête, mais il y'a des exemples dans le forum

Starec

[Pascal Lob]

J'ajoute un petit message à cette discussion parce que j'ai un pb du degré suivant.
Comme le décrit ProjElecT j'ai ajouté l'OXC et inséré une visualisation d'un fichier PDF dans un formulaire, tout va bien.
J'ai créé un package d'installation, et installé tout ça sur des postes tout va bien.
Avec W7 il faut déclarer l'ocx à la main mais on s'en sort.
Par contre au bout de quelques semaine il y a un poste ou ça ne fonctionne plus.
Je crois que l'utilisateur à mis à jour son acrobat reader.
Est ce que cela veut dire que je dois recompiler l'application avec la nouvelle version acrobat ou est ce qu'il y a moyen d'utiliser la version qui est déclarée sans l'intégrer dans les références de l'application.
Je fais déjà ça avec Word et Excel avec un createobject plutôt que l'ajout de la ref.
J'espère que je suis clair.