Erreur système ("La classe n'existe pas.") pour les experts

Question

Salut à tous,
Lorsque je veux lancer l'exe de mon appli  le message suivant apparait:

"Erreur système &H80070583 (-2147023485). La classe n'existe pas."

Je n'arrive pas à comprendre et à trouver l'origine du problème....
Est que quelqu'un  voit  d'où ça vient je tourne en rond comme un fou...

Merci d'avance!

mister N

mortalino · Answer

Salut,

Avant de compiler ton appli, met Option Explicit dans les déclarations, cela te premettra lors de la compilation la vérification de ton code.

Si un problème existe (tel est le cas), VB6 t'amène sur cette erreur.

Pour ton problème, je ne vois que 2 choses : Module de classe manquant ; ou références manquantes.

++

Mortalino

PCPT · Answer

salut,

également Ctrl+F5 pour tester.... (pré-compilation)

<hr size="2" width="100%" />Prenez un instant pour répondre à ce sondage svp

misterN · Answer

>Mortalino

Merci pour ta réponse 
-pour Option Explicit je le fais systématiquement
-mais comment trouver le module de classe manquant alors que je n'en utilise que deux,je ne sais pas comment solutionner ce problème

@+

mister N

misterN · Answer

>PCPT

Merci pour ta réponse 
-pour Ctrl+F5 pas de pb particulier
-mais
comment trouver un module de classe manquant alors que je n'en utilise
que deux,je ne sais pas comment solutionner ce problème...:-(

@+

mister N

PCPT · Answer

salut

"la classe n'existe pas" en compilé ne touche pas forcément un vrai module de classe.
vérifie peut-être tes composants/références et supprime ceux qui ne sont pas utilisés.
(sauvegarde avant, dans le doute )

<hr size="2" width="100%" />Prenez un instant pour répondre à ce sondage svp

misterN · Answer

>PCPT

Je vais dans le sens de tes précieux conseils et si c'est positif je te le fais savoir...;-)

@+

mister N

VBsearch · Answer

Bonjour
 C'est trop ou très tard dira-t-on, mais cela peut toujours aider ceux qui en ont besoin.
 En fait, lorsqu'on veut appliquer le style XP, on doit déclarer l'une ou l'autre fonction :
Private Type InitCC
  lngSize As Long
   lngICC As Long
End Type
Dim CCX As InitCC_Infos
Const ICC_USR = &H200

Private Declare Function InitCommonControlsEx Lib "comctl32.dll" (CCX As InitCC_Infos) As Boolean
 ou bien :
Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long
puis l'appeler dans l'évènement Initialize de chaque Form:
Private Sub Form_Initialize()
  With CCX
       .lngSize = LenB(CCX)
       .lngICC = ICC_USR
   End With
 InitCommonControlsEx CCX
  ou bien
 Dim AB As Long
  AB=InitCommonControls
End Sub

A cœur vaillant rien d'impossible

VBsearch · Answer

Errata
 Une erreur de saisie s'est glissée dans le texte précédent du "Type", en voici la correction
Private Type InitCC_Infos
  lngSize As Long
  lngICC As Long
End Type 
 Excusez cette inattention

Erreur système ("La classe n'existe pas.") pour les experts

8 réponses

Votre réponse

Discussions similaires