Discussion :

[Golzinne]

Bonjour,

Je peux faire une fonction coté server qui me ramène par exemple un boolean, en version simplifiée, celà donne:

Code :

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

1
2
3
4
  <Invoke()> _
    Public Function testBool() As Boolean
        Return True
    End Function

la fonction testBool devrait donc me retourner toujours "true".

Coté client, si je fais:

Code :

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

1
2
3
4
 Dim bbb As Boolean = False
        Dim ctx As New J_Context 'ça c'est mon contexte
 
        bbb = ctx.testBool()

il me dit :

Value of type 'System.ServiceModel.DomainServices.Client.InvokeOperation(Of Boolean)' cannot be converted to Boolean

Visiblement, ma fonction ne me retourne pas comme prévu un boolean mais un invokeOperation (Of Boolean) ??

Est-ce la bonne méthode ?
et si oui, comment convertir mon "of Boolean" en boolean ?

[tomlev]

Les appels de service web en Silverlight sont toujours asynchrones, de façon à ne pas bloquer le thread d'interface graphique. Donc la méthode testBool ne renvoie pas un Boolean, mais un objet qui représente l'appel à la méthode. Il faut s'abonner à l'évènement Completed de l'objet InvokeOperation, pour être notifié quand l'appel se termine:

Code VB.NET :

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

1
2
3
4
5
6
7
8
9
10
11
12
        Dim ctx As New J_Context 'ça c'est mon contexte
        Dim op As InvokeOperation(Of Boolean) = ctx.testBool()
        AddHandler op.Completed, AddressOf testBool_Completed
 
 
...
 
    Private Sub testBool_Completed(ByVal sender As Object, ByVal e As EventArgs)
        Dim op As InvokeOperation(Of Boolean) = CType(sender, GetType(InvokeOperation(Of Boolean)))
        Dim b As Boolean = op.Value
        ' Fais ce que tu as à faire avec la valeur...
    End Sub

Il y a peut-être plus simple, mais je connais pas très bien WCF Ria Services... quelqu'un d'autre aura peut-être une meilleure solution

[Golzinne]

Merci Tomlev pour tes explications et ton code.

Un seul petit changement dans:

Code :

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

        Dim op As InvokeOperation(Of Boolean) = CType(sender, GetType(InvokeOperation(Of Boolean)))

à remplacer par

Code :

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

        Dim op As InvokeOperation(Of Boolean) = CType(sender, InvokeOperation(Of Boolean))

voici un petit exemple qui me retourne le double de l'integer que j'ai passé en paramètre.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs)
        Dim ctx As New J_Context
        Dim op As InvokeOperation(Of Integer) = ctx.testDoubleInteger(33)
        AddHandler op.Completed, AddressOf testDoubleInteger_Completed
 
 
    End Sub
 
    Private Sub testDoubleInteger_Completed(ByVal sender As Object, ByVal e As EventArgs)
        Dim op As InvokeOperation(Of Integer) = CType(sender, InvokeOperation(Of Integer))
        Dim b As Integer = op.Value
 
        MessageBox.Show(b.ToString)
    End Sub

[tomlev]

Un seul petit changement dans:

Code :

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

        Dim op As InvokeOperation(Of Boolean) = CType(sender, GetType(InvokeOperation(Of Boolean)))

à remplacer par

Code :

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

        Dim op As InvokeOperation(Of Boolean) = CType(sender, InvokeOperation(Of Boolean))

Ah oui pardon... la syntaxe de VB et moi, ça fait 3