Discussion :

[m_charmat]

Bonjour,

J'ai réaliser une application ou jeu peut afficher mes fichiers PDF dans un formulaire grâce un code suivant :
Sachant que mes fichier PDF sont nommée en "Anne_Irssaliette-Numero__Irssaliette".

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Commande65_Click()
If Dir("\\SERVEUR-PC\PartagesApplications\Irssaliatte_Psychiatrie_légale\BD_Irssaliatte\PDF_Irssaliatte\" & [Anne_Irssaliette] & "-" & [Numero__Irssaliette] & ".pdf") = "" Then
  MsgBox "Le fichier n'existe pas"
Else
  Dim filepath As String
 
filepath = "\\SERVEUR-PC\PartagesApplications\Irssaliatte_Psychiatrie_légale\BD_Irssaliatte\PDF_Irssaliatte\" & [Anne_Irssaliette] & "-" & [Numero__Irssaliette] & ".pdf"
 
WebBrowser9.Object.Navigate filepath
End If

Ce code marcher très bien quand j'avais office 2013, mais depuis l'installation de la version 2016, il m'affiche ce message :

"Adobe Acrobat ne peut prendre en charge le mode protégé amélioré d'internet Explorer. Installer la dernière version d'Adobe reader ou désactivé le mode protégé dans internet Explorer."

J'ai désactivé ce mode dans Internet Explorer et dans l'Adobe Reader XI même, mais ce message s'affiche toujours, sachant que j'utilise "CHROM (par défaut)" et "MOZELLA".

Je n'arrive toujours pas a afficher mes fichier PDF.

Vous avez une idée d’où vient le problème ?

Cordialement.

[micniv]

Bonjour,
as-tu déclaré la référence "Microsoft Internet controls" ?

[m_charmat]

Bonjour,

Je ne sais même pas de quoi il s'agit.

Cordialement