Discussion :

[flohand]

Salut a tous je vous soumet ma question car elle est un peux tordue, je ne sais vraiment pas si c'est réalisable en fait.....

voila je code un programme en VB 2005 (jusque là tout va bien), qui doit effectuer des actions en fonction de ce qu'un utilisateur rentre dans un textbox

voici ce que je doit faire

si l'utilisateur à tappé "help" alors je doit lui mettre un msgbox("vous avez demandé de l'aide")
si l'utilisateur à tappé "coucou" alors je doit change un label.caption en "bonjour Mr...."

etc....


voila le problème c'est que la liste des Mots clés/Action n'est pas fixe et quelle doit pouvoir évoluée dans le temps, et les actions asso aux mot clés peuvent elle aussi changé dans le tps....

j'ai donc crée une base de donnée avec une table ACTIONS avec 2 Champs: MOTCLE et REALISERACTION
voici une vue de ma base
---------------------------
|MOTCLE|REALISERACTION|
---------------------------
| help | msgbox("aide") |
---------------------------
| coucou| label1.cation="bonjour" |
---------------------------

j'aimerais pouvoir faire une fonction ou une procédure qui m'execute les actions de la colone REALISERACTION

voila ce que j'aimerais créer

Code :

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

1
2
3
4
5
6
 
 
strSQL = "SELECT  REALISERACTION FROM ACTIONS WHERE MOTCLE=" & Chr(34) & Message.Text & Chr(34)
rs = cn.Execute(strSQL)
 
EXECUTION (rs("REALISERACTION ").Value)

voila ce que j'arrive pas a coder

Code :

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

1
2
3
4
 
function EXECUTION (param)
...................
end function

[benji_dv]

Bonjour,
A mon avis, tu as 2 solutions, la simple et la moins simple ,
la simple :
tu fais un select case(param) et en fonction du param tu exécutes la méthode adhoc,
la seconde :
tu pars du pattern strategie, qui permet d'obtenir des classes d'exécution,
tu crées une ressource dll, qui contient les classes de pattern stratégie (ou une classe est un comportement) et tu charges dynamiquement (System.Reflection) l'assembly dans l'application principale,
Et tu invoque dynamiquement les appels d'instanciation de classes qui respectent l'interface définie par ton pattern stratégie...
Là, cette solution est super dynamique, car tu places dans champs REALISERACTION que le nom de la classe à instancier dynamiquement...
(Je vais évidament pas le donner le code...) mais la seconde piste me semble intéressante dans ton cas...

voilou

[flohand]

Merci beaucoup pour votre réponse qui m'a permis d'avancer...


voila j'ai crée une DLL simple et mechante:

Code :

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

1
2
3
4
5
Public Class FB_Actions
        Public Sub recup(ByVal var As String)
           msgbox(var)
        End Sub
End Class

j'aimerais faire appel dynamiquement a cette DLL par refexion

voici mon code

Code :

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

1
2
3
4
5
6
7
8
   Dim Ass As [Assembly] = Ass.LoadFrom("MA_DLL.dll")
        Dim o As Object = Ass.CreateInstance("FB_Actions")
        Dim t As Type = o.GetType()
        Dim args(0) As Object
        Dim b As BindingFlags
        b = BindingFlags.DeclaredOnly Or BindingFlags.Public Or BindingFlags.NonPublic Or BindingFlags.Instance Or BindingFlags.InvokeMethod
        args(0) = "Hello"
        t.InvokeMember("recup", b, Nothing, o, args)

lorsque j'execute mon code j'ai une erreure a cette ligne:

Dim t As Type = o.GetType()

"La référence d'objet n'est pas définie à une instance d'un objet." avez vous une idée ???

merci d'avance

[flohand]

autant pour moi je viens de trouver la solution ... j'avais une erreur dans la ligne

Code :

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

Dim o As Object = Ass.CreateInstance("FB_Actions")

j'aurais du mettre

Code :

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

Dim o As Object = Ass.CreateInstance("actions.FB_Actions")

voila si ca peux servir a quelqu'un....