Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Ouverture fichier PDF en code

Ouverture fichier PDF en code

3 réponses
Avatar
AA
Bonjour,

j'ai un problème pour ouvrir en code un fichier PDF sur Access XP. Acrobat
Reader s'ouvre mais il me dit ensuite que le fichier est introuvable. Est-ce
que quelqu'un a une idée ?
Call Shell("C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.exe
d:\test.pdf", 1)

Merci d'avance.

Anthony.
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Raymond [mvp]
Bonsoir.

essaie l'api que tu trouveras sur la page:
http://access.seneque.free.fr/executer_selon_ext.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"AA" a écrit dans le message de
news:ccguo7$49i$
Bonjour,

j'ai un problème pour ouvrir en code un fichier PDF sur Access XP. Acrobat
Reader s'ouvre mais il me dit ensuite que le fichier est introuvable.
Est-ce

que quelqu'un a une idée ?
Call Shell("C:Program FilesAdobeAcrobat 6.0ReaderAcroRd32.exe
d:test.pdf", 1)

Merci d'avance.

Anthony.




Avatar
PatCatNat's
Bonjour,

Je suis en access 97.

Pour ma par j'ai essayé, mais j'ai un message d'erreur dans mon module
concernant les 4 lignes "Enum" lors de la compilation :

Attendu : Identificateur.

La partie concernée est :

Public Enum TypeOpen
Hide = 0
Normal = 1
Minimized = 2
Maximized = 3
Restore = 9
End Enum
Public Enum OP
OpExecute = 1
OpPrint = 2
End Enum

L'idée est séduisante pourtant. Si vous avez la solution...

Merci

Patrice


"Raymond [mvp]" a écrit dans le message de
news:%
Bonsoir.

essaie l'api que tu trouveras sur la page:
http://access.seneque.free.fr/executer_selon_ext.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"AA" a écrit dans le message de
news:ccguo7$49i$
Bonjour,

j'ai un problème pour ouvrir en code un fichier PDF sur Access XP.
Acrobat


Reader s'ouvre mais il me dit ensuite que le fichier est introuvable.
Est-ce

que quelqu'un a une idée ?
Call Shell("C:Program FilesAdobeAcrobat 6.0ReaderAcroRd32.exe
d:test.pdf", 1)

Merci d'avance.

Anthony.








Avatar
Raymond [mvp]
Faut se moderniser ........

fais les modifs suivantes:

'Public Enum TypeOpen
' Hide = 0
' Normal = 1
' Minimized = 2
' Maximized = 3
' Restore = 9
'End Enum
'Public Enum OP
' OpExecute = 1
' OpPrint = 2
'End Enum

Const Hide = 0
Const Normal = 1
Const Minimized = 2
Const Maximized = 3
Const Restore = 9
Const OpExecute = 1
Const OpPrint = 2

Function OpenFileExtend(FileName As String, _
Optional Window As Long = 1 _
, Optional Operation As Long = 1 _
) As Boolean

Il faut remplacer les constantes énumérées par leur valeur numérique.
Donc tu n'auras plus la pré-composition des options et tu devras indiquer la
valeur numérique au lieu de l'énumération.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"PatCatNat's" a écrit dans le message de
news:cchdii$jt6$
Bonjour,

Je suis en access 97.

Pour ma par j'ai essayé, mais j'ai un message d'erreur dans mon module
concernant les 4 lignes "Enum" lors de la compilation :

Attendu : Identificateur.

La partie concernée est :

Public Enum TypeOpen
Hide = 0
Normal = 1
Minimized = 2
Maximized = 3
Restore = 9
End Enum
Public Enum OP
OpExecute = 1
OpPrint = 2
End Enum

L'idée est séduisante pourtant. Si vous avez la solution...

Merci

Patrice