Probleme ActiveX avec VistaRésolu

Question

Bonjour a tous

J'ai fais une apllication d'auto-formation pour ma compagnie qui marche tres bien. Un Menu Vb sur lequel je places des Boutons qui ouvrent soit un PPW soit un Pdf, les sujets sont renouvelés tout les 6 mois. Tout marchait , je realise que de plus en plus j'ai des réclammations pour l'ouverture des Pdf. En cherchant je me rends compte que seul les employés qui ont migrer vers Vistq on ce Problem. Le message d'erreur est le suivant :

---- Le composant ActiveX ne peut pas créer l'objet ----

voici le code que j'utilise

Sub OpenMyPdf(MyPdfFile)
Dim myAVDoc As Object
Dim myApp As Object
 
Dim ok
 
Set myApp = CreateObject("AcroExch.App")
Set myAVDoc = myApp.GetActiveDoc 'CreateObject("AcroExch.AVDoc")
Set myAVDoc = CreateObject("AcroExch.AVDoc")
 
 
myApp.Show
ok = myAVDoc.Open(MyPdfFile, "")
 
End Sub




Merci de Votre aide

jmf0 · Accepted Answer

Utilisation incorrecte de Me et ca me rameme a Me.hwnd. Il est vraisemblable que ton code ne se trouve pas sur la Form copncernée, mais ailleurs (dans un module ?)
Me se réfère à la Form en cours
Si ce code n'a pas été mis sur la Form, le hwnd de celle-ci doit alors être extrait non par Me.hwnd, mais par le_nom_de_la_form.hwnd

cs_Jack · Answer

Salut
Trop spécifique.
Vois sur le site du créateur de "AcroExch"

Si tu ne dois faire que l'affichage du PDF, pourquoi ne pas laisser faire Windows afin qu'il trouve quel logiciel utiliser pour l'afficher ?
--> API nommée "ShellExecute"
Exemple dans <cette source>

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Renfield · Answer

je pense que les droits d'amin sont requis pour faire cette instanciation.

a tester...

Renfield - Admin CodeS-SourceS - MVP Visual Basic

Mayzz · Answer

Salut,

Regarde aussi coté compatibilité 32/64bits, vérifi que le composant est bien enregistré dans l'émulateur 32bits de Vista dans le cas d'un système Vista x64 (Google => Wow64Node, SysWow, SysWows64). 

++

Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.

Tsouheil · Answer

Bonjour Jack

Oui je ne que de l'afficage du Pdf ; j'ai essayé ta procédure j'ai ce message d'erreur :
Utilisation incorrecte de Me et ca me rameme a Me.hwnd.

Tsouheil · Answer

Salut Renfield

Merci pour ta réponse j'ai deja entendu parler de ca mais je ne vois pas comment le faire ,, surtout que moi je fais des Cd de formations que mon entreprise distribue aux employés et donc comment savoir si chacun est Admin ou pas ? Ya t il un moyen pour le savoir ? et comment forcer ses droits si cela est possible ? 


Merci

Tsouheil · Answer

Salut Mayzz

merci pour ta reponse je suis entrain de regarder ca ,, je t'avoue que je suis pas fort dans ce domaine la..... Mais cela peut poser un pb les 32 et 64 bits ? comment je peux voir cet emulateur sur mon ordi ?

Merci

Renfield · Answer

utilises tu bien VB6  et non VBA ou .NET ?

Renfield - Admin CodeS-SourceS - MVP Visual Basic

Tsouheil · Answer

Bonjour Jmf0

Tu as raison ma fonction se trouve dans un module et elle est appleé un peu de partout , mais bon ca marche maintenant merci

A+

Probleme ActiveX avec Vista

9 réponses

Votre réponse

Discussions similaires