Bonjour, j'ai un petit problème à vous soumettre dans le code suivant ^_^

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
    Public Sub Start(ByVal ConfigPort As Integer)
 
#If DEBUG Then
		If Not Debugger.IsAttached Then
		Debugger.Launch
		End If
#End If
 
        For Each c As IChannel In ChannelServices.RegisteredChannels
            If TypeOf (c) Is IChannelReceiver Then
                Dim cReceiver As IChannelReceiver = TryCast(c, IChannelReceiver)
                If c.ChannelName = "SWXServiceConfigTCP" AndAlso cReceiver.ChannelData IsNot Nothing AndAlso cReceiver.ChannelData.GetType Is GetType(ChannelDataStore) Then
                    For Each strUri As String In DirectCast(cReceiver.ChannelData, ChannelDataStore).ChannelUris
                        If strUri.Contains(":" & ConfigPort) Then
                            ChannelServices.UnregisterChannel(c)
                            Exit For
                        End If
                    Next
                    'ElseIf c.ChannelName = "SWXServiceConfigTCP" Then
                    '    ChannelServices.UnregisterChannel(c)
                End If
            End If
        Next
 
        Dim Channel As IChannelReceiver = Nothing
 
        Channel = New TcpServerChannel("SWXServiceConfigTCP", ConfigPort)
 
        ChannelServices.RegisterChannel(Channel, False)
 
        RemotingConfiguration.RegisterWellKnownServiceType(GetType(SWXServiceConfig), "SWXServiceConfig", WellKnownObjectMode.Singleton)
    End Sub
Le problème est que lorsque que je fais Channel = New TcpServerChannel("SWXServiceConfigTCP", ConfigPort), j'ai l'erreur
Only one usage of each socket address (protocol/network address/port) is normally permitted
Par contre For Each c As IChannel In ChannelServices.RegisteredChannels a un length de 0.

De plus, si je roule en DEBUG (donc que le code s'ouvre dans Visual Studio après avoir atteint le "Debugger.Launch") tout fonctionne.

Qu'est-ce que je fais d'incorrect?

Merci de votre temps ^_^