j'utilise l'interface XConnection dans un objet et je cherche à "l étendre" avec l'interface XConnection2 qui est décrite ici
Comment dois-je procéder en Basic.
Voici le code de départ :
Code : Tout sélectionner
Sub TestSocket()
Dim oConnector
Dim oConnection
Dim sConDesc As String
sConDesc = "socket,host=localhost,port=6315"
oConnector = CreateUnoService("com.sun.star.connection.Connector")
oConnection = oConnector.connect(sConDesc)
Ami calmant, J.P