[vb.net][remoting] Configuration pour une instance unique

Voila j'ai un petit problème de configuration cotée client

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

<system.runtime.remoting> <application> <channels> <channel ref="tcp"> <serverProviders> <formatter ref="binary" typeFilterLevel="Full"/> </serverProviders> <clientProviders> <formatter ref="binary" /> </clientProviders> </channel> </channels> </application> </system.runtime.remoting>

---

Cette configuration (dans app.config) marche bien en temps normal, mais lorsque j'active l'option "Make single instance application" dans les options de "My project" ca plante royalement avec une erreur du type :

Citation:

---

"Une erreur s'est produite lors de la création du formulaire. Pour plus d'informations, consultez Exception.InnerException. L'erreur est : Échec de la configuration d'accès distant avec l'exception 'System.Runtime.Remoting.RemotingException: Le canal 'tcp' est déjà inscrit.\r\n à System.Runtime.Remoting.Channels.ChannelServices.RegisterChannelInternal(IChannel chnl, Boolean ensureSecurity)\r\n à System.Runtime.Remoting.Channels.ChannelServices.RegisterChannel(IChannel chnl, Boolean ensureSecurity)\r\n à System.Runtime.Remoting.RemotingConfigHandler.ConfigureChannels(RemotingXmlConfigFileData configData, Boolean ensureSecurity)\r\n à System.Runtime.Remoting.RemotingConfigHandler.ConfigureRemoting(RemotingXmlConfigFileData configData, Boolean ensureSecurity)'."

---

Si quelqu'un a une idée :aie:

ps@admin : je ne sais pas si j'ai bien fait de le poser là mon sujet :oops:

Bon j'ai trouvé une réponse ici :
http://groups.google.com/group/micro...10af03dc90a10e
et en faite dans mon code j'ai créer une autre méthode a l'instanciation.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Private Sub TcpChannel() Dim properties As System.Collections.IDictionary = New System.Collections.Hashtable() properties("name") = String.Empty properties("priority") = "10" ' The channel is registered on client as follows... Dim serverProv As BinaryServerFormatterSinkProvider = New BinaryServerFormatterSinkProvider() serverProv.TypeFilterLevel = System.Runtime.Serialization.Formatters.TypeFilterLevel.Full   Dim clientProv As BinaryClientFormatterSinkProvider = New BinaryClientFormatterSinkProvider()   Dim channel As TcpChannel = New TcpChannel(properties, clientProv, serverProv) ChannelServices.RegisterChannel(channel, False) End Sub

---

Tout en cochant l'option d'instance unique ... et voila ca marche :D
En gros c'est une histoire de priorité qui bloque, et créer son canal avec une forte prioritée résoud le problème.:P