on error resume next Dim checkForFlash6 checkForFlash6 = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.6"))) if checkForFlash6 = true then document.write("") else document.write("Pour accéder à l'intégralité des menus sur ce site, vous devez mettre à jour votre plug in Flash Player, il permet de consulter des sites Web dernière génération, intégrant de la vidéo, du texte, du son et des graphiques interactifs. Flash est un standard incontournable puisqu'il est déjà installé sur 98 % des ordinateurs de bureau.
Télécharger Flash Player
") end If