TROUVER LA CLASSID D'UNE DLL ACTIVEX
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
-
14 févr. 2007 à 08:26
cs_DarkVader Messages postés 51 Date d'inscription samedi 21 octobre 2000 Statut Membre Dernière intervention 10 octobre 2011 - 19 mars 2007 à 16:05
cs_DarkVader Messages postés 51 Date d'inscription samedi 21 octobre 2000 Statut Membre Dernière intervention 10 octobre 2011 - 19 mars 2007 à 16:05
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/41466-trouver-la-classid-d-une-dll-activex
https://codes-sources.commentcamarche.net/source/41466-trouver-la-classid-d-une-dll-activex
19 mars 2007 à 16:05
pour qui était intéressé par le sujet. 8)
19 mars 2007 à 15:44
@+
16 mars 2007 à 09:44
Comme j'ai tendance à lire en diagonale,
il est possible que je n'ai pas saisi le but exact de l'exercice
(trouver le GUID et les CLSID ou les convertir).
Juste pour compléter cette file, il existe une librairie méconnue
qui gère cet exercice : TLI (Typelib Informations) -
Sub getCLSID(fullFileName As String)
Dim clsTLI As New TLIApplication, objTLI As New TypeLibInfo, i As Long
Set objTLI = clsTLI.TypeLibInfoFromFile(fullFileName)
Debug.Print "GUID de la librairie: "; vbTab & objTLI.GUID
Debug.Print String(64, "-")
For i = 1 To objTLI.CoClasses.Count 'shows GUID of each class
Debug.Print " Classe: "; objTLI.CoClasses(i).Name
Debug.Print Space(12) & "=====> CLSID: "; objTLI.CoClasses(i).GUID
Next
Debug.Print
End Sub
22 févr. 2007 à 09:12
22 févr. 2007 à 08:37
une fois que j'ai la CLASSID,
il suffit de récupérer dans la base de registre
les infos qui me manquent.
Je voulais avoir du tout cuit ;-)
21 févr. 2007 à 14:58
Mais il me manque une info!
Le chemin et le nom de la dll(ocx ...)!
Possible? MERCI!
14 févr. 2007 à 16:26
How To Call CLSID And ProgID Related COM APIs in Visual Basic
http://support.microsoft.com/default.aspx/kb/183544/en-us
14 févr. 2007 à 08:26
DarK Sidious