// Procédure qui permet d'initialiser l'activeX dynamiquement
// L'ActiveX est-il installé ?
SI PAS RegistreExiste("HKEY_CLASSES_ROOT\Shell.Explorer") ALORS
Erreur("Cette application nécessite Internet Explorer 4 minimum")
FinProgramme()
FIN
// Chargement de l'ActiveX
ACTACROBAT="Shell.Explorer"
// Vérification de la présence de l'objet Shell.Explorer
objTest est un objet OLE dynamique = actacrobat
SI objTest = Null ALORS
libérer objTest
Erreur("Le navigateur du poste n'est pas internet explorer, vous ne pouvez pas afficher les documents PDF")
FIN
libérer objTest
FIN
// Chargement du fichier
Message("Chargement du fichier "+F_NomfichPdf)
ACTACROBAT>>navigate(F_NomfichPdf)
Multitâche(-1)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=4907&post_id=20321