[Débutant] Problème de création d'objet (ActiveX)
Hello,
Je débute en VB et j'essaie de recopier un code fournit par un fabricant.
Cependant, le programme m'indique une erreur dès le départ : Je n'arrive pas à créer un objet.
Quelqu'un pourrait-il m'aider...
Code:
1
2
3
4
5
6
7
8
9
| Public Class Class1
Private WithEvents gICham As INSTCTRLLib.CCham
Set gICham = CreateObject("InstCtrl.Cham")
Public Interface ICham
gICham.ScanStart()
End Interface
End Class |
echec creation d'un objet activex
bonjour mat32
Pour un controle Activex (a priori et vu que tu es avare d'information )c'est etrange que tu n'utilise pas la boite à outils .
Et que tu instancie le controle en faisant appel à du "late binding" par l'appel à l'interface.
Enfin relativement à ton code on devrait avoir ceci (la partie declaration interface est inutile et tu as probablement mal interprete la doc .Elle veut dire que l'objet Interface ICham peut appeller la methode ScanStart de cette facon).
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
'Ceci est une documentation indiquant que l'interface
'ICham supporte une methode ScanStart()
'Public Interface ICham
' gICham.ScanStart()
'End Interface
Public Class Class1
Private WithEvents gICham As INSTCTRLLib.CCham
Public Sub New()
gICham = CreateObject("InstCtrl.Cham")
gICham.ScanStart()
End Sub
End Class |
Dans le cas d'appel des interface par "late binding" verifie avec l'outil OleViewer que le controle et eventuellement la librairie d'accompagnement
1/sont bien enregistres sur ta machine
2/que le ProgID(identificateur de programme) de ton controle Activex s'ecrit bien "InstCtrl.Cham" et pas autrement (la doc peut comporter des erreurs de frappe).
Bon code....
