Discussion :

[tatam]

Bonjour à tous amis développeur,
j'ai une application (plus précisément une bibliothèque de classe) que je réalise en VB.NET (à l'aide de l'outil Visual Basic Express de Microsoft). J'ai réalisé plusieurs DLL sous WD que je place dans mon projet .NET.

J'ai donc bien accès à mes procédures WD depuis mon code VB, je peux envoyer mes paramètres, tout se passe très bien. Mais... C'est l'inverse qui me pose problème.
Admettons que j'ai une procédure WD simple de type :

Code :

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

1
2
3
4
5
PROCEDURE test_liaison()
monResult est une chaine
FEN_1.SAI_test = monResult
 
RENVOYER monResult

Ce qui m'intéresse ici c'est le résultat de ma procédure. J'ai donc fais un code VB bateau du type :

Code :

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

1
2
3
4
5
6
 
imports WL
private sub test()
dim monResult as String
monResult = WL.Procedures_globales_test.test_liaison()
end sub

Le problème étant qu'au moment ou VB reprends la main, il n'y a plus la procédure WD active et donc il ne reçoit rien.
D'où ma question. Comment renvoyer une valeur à VB d'une procédure WD ?

Merci par avance de votre aide .

[VincentRoy]

Personnellement, je n'ai aucun souci quand je code en C# et que j'appelle une procédure d'une DLL .net générée avec Windev renvoyant une valeur ... Ou alors je n'ai pas bien compris ta question.
Vince

[tatam]

Bonjour,
Comment fais tu?
Moi cela ne renvoie rien (Exemple avec mon code ci-dessus) !
En mode test, WD, j'ai bien la valeur pourtant !

[klbsjpolp]

Bonjour,

As-tu essayé de renvoyer une chaine simple plutôt que la valeur d'un champ?

Code :

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

1
2
3
PROCEDURE test_liaison()
 
RENVOYER "test"

[tatam]

Bonjour,

si je renvoi directement une chaine j'ai bien mon information. Cela résout à moitié mon problème (C'est déjà une bonne évolution) mais je veux aussi renvoyer la valeur d'un champ.

[routmout]

Code :

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

1
2
3
4
5
6
 
PROCEDURE test_liaison()
monResult est une chaine
FEN_1.SAI_test = monResult
 
RENVOYER monResult

Si je comprends ton problème tu as juste fais une inversion dans ton code.

Si tu compte récupérer de la procedure WD la valeur de Fen_1.SAI_test pour la passer a monResult et la renvoyer pour que la valeur soit lu dans ton code VB cela donne tout simplement

Code :

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

1
2
3
4
5
 
PROCEDURE test_liaison()
monResult est une chaine
monResult = FEN_1.SAI_test
RENVOYER monResult

là tu retournera la valeur de ton champ et non tu donnera au champs la valeur de monResult.

Bon je pense que ton problème est à un autre niveau car ceci est un exemple :p

Si j'étais toi je passerai monResult en paramètre à la fonction

Code :

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

1
2
3
4
 
PROCEDURE test_liaison(monResult)
 
monResult = FEN_1.SAI_test

Tu pourras s'il y a une erreur voir le problème (Erreur de correspondance des type de variable)

L'appel côté VB serat

Code :

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

1
2
3
4
5
6
 
imports WL
private sub test()
dim monResult as String
WL.Procedures_globales_test.test_liaison(monResult )
end sub

Tu passe par l'adresse de la variable en mémoire donc windev pourrait peut être moins facilement se perdre :p