Discussion :

[majidic]

Bonjour,

J'ai une variable string "NomClasse" qui passe en paramettre pour une fonction "LaFonction", et je veux pouvoir déclarer dans le corps de cette fonction une classe de type "NomClasse".
j'ai essayé le code suivant:

classNorme = procedures(0).ChildNodes(i).Attributes("class").Value
'classNorme est de type string
cl = Type.GetType(classNorme)
Dim ob As Object = cl.InvokeMember("Verify_Name_procedure",System.Reflection.BindingFlags.CreateInstance,Nothing, Nothing, Nothing)

cela me retourne l'exception:object reference not set to an instance of an object

Merci

[olsimare]

Bonjour.

C'est un peu normal d'aprés le code, tu essayes de créer une instance de type classNorme à partir d'un constructeur "Verify_Name_procedure" sur ce type ... A mon avis, c'est pas ton but premier ! Comme "Verify_Name_procedure" n'est pas un constructeur ça le fait pas.

Y'a un bon exemple dans l'aide sur Type.InvokeMember, méthode (String, BindingFlags, Binder, Object, Object[]).

Remarque personnelle :
J'utilise plutot que monType.InvokeMember, un AppDomain.CurrentDomain.CreateInstance qui me permet d'instancier des classes sur un assembly différent de celui de la classe d'instanciation.

Cdt.

[majidic]

En effet le problème est le suivant: la classe que j'instancie se trouve dans une dll attachée à mon projet (comme une reference). le nom du dll est SQLLib et celui de la classe est Verify_Name_procedure.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
 
cl = Type.GetType("SQLLib.Verify_Name_procedure")
Dim ob As Object = cl.InvokeMember("Verify_Name_procedure",System.Reflection.BindingFlags.CreateInstance,Nothing, Nothing, Nothing)

cela me retourne l'exception:object reference not set to an instance of an object

Merci

[olsimare]

Bonjour.

Normal je pense car tu fonctionnes sur un assembly différent de celui qui tente l'instanciation. Il faut donc que tu mettes le "nom complet" de la classe au sein de cette assembly.

Essayes ça :
dans ta DLL

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Public Class Verify_Name_procedure
    Public Function monTest()
        Return "TestOk"
    End Function
End Class

dans le projet utilisant cette DLL

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
        Dim a As New Verify_Name_procedure
        Dim cl As Type = a.GetType
        Dim strAQN As String = cl.AssemblyQualifiedName
        Console.Write(strAQN)
        cl = Type.GetType(strAQN)
        Dim ob As Object = cl.InvokeMember(strAQN, System.Reflection.BindingFlags.CreateInstance, Nothing, Nothing, Nothing)
        MsgBox(CStr(ob.monTest()))

Ca marche chez moi et ça va te donner le nom complet du type.

Donc aprés tu pourras faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
        Dim strAQN As String = "Ici le nom complet"
        Dim cl As Type = Type.GetType(strAQN)
        Dim ob As Object = cl.InvokeMember(strAQN, System.Reflection.BindingFlags.CreateInstance, Nothing, Nothing, Nothing)
        MsgBox(CStr(ob.monTest()))

Par contre, c'est pourri de mettre tout cela en dur --> si tu changes d'assembly pour la DLL t'es foutu ...

Faudrait peut être ajouter une petite fonction dans cette DLL qui retourne l'assembly est passer par le CreateInstance...

Cdt.

[majidic]

Merci.

[neptune]

Sur les 10 jours qui viennent de s'écouler, c'est la 3ième question du genre que je lit.

Ayant répondu à la première, je ne vais pas me répeter, faudrait peut-être apprendre à chercher...

[olsimare]

Bonjour.

Neptune, ne répond que celui qui veux ...

Et sans te contredire, ce que j'ai lu sur le sujet dans le forum tenait plus du invokemember qu'autre chose, donc avec les limites qu'on connait !

Mais bon, je ne serai pas formel sur le fait que cela a peut être déjà été traité.

Y'a pas mort d'homme --> Keep cool !

Cdt.