El codigo de un cliente que llama a un Servidor de DDE, puede ser algo
asi:

Function Obre_Comunicacio () As Integer

   On Error GoTo Err_Obre_Comunicacio

   If V_Remote_DDE Then
      Frm_Main!Txt_Link.LinkMode = 0
      Frm_Main!Txt_Link.LinkTimeout = 5000
      Frm_Main!Txt_Link.LinkTopic = "\\" & V_Remote_Computer &
"\NDDE$|VBDDESource$"
      Frm_Main!Txt_Link.LinkItem = "Txt_In"
      Frm_Main!Txt_Link.LinkMode = 1
      Frm_Main!Txt_Link.LinkRequest
   Else
      Frm_Main!Txt_Link.LinkTimeout = 5000
      Frm_Main!Txt_Link.LinkTopic = "DDESRV|Frm_Menu"
      Frm_Main!Txt_Link.LinkItem = "Txt_In"
      Frm_Main!Txt_Link.LinkMode = 1
      Frm_Main!Txt_Link.LinkRequest
   End If

   Obre_Comunicacio = True

   Exit Function

Err_Obre_Comunicacio:

   Frm_Main!Txt_Link = "No DDE link" & "(" & Str$(Err) & ")>"

   Obre_Comunicacio = False

   Exit Function

End Function


- V_Remote_DDE es una variable booleana que nos permite la pequeña (pero
importante)distincion entre conectar con el servidor localmente o
remotamente. De este modo se observa claramente la diferencia entre
conectar con el servidor de una manera o otra.

Windows 3.11 necesita tener la opcion adequada activada en el panel de
control, red.
Windows 95 no tiene esa cosa tan bonita, pero si nos aseguramos de
ejecutar NETDDE.EXE obtenemos el mismo resultado.
Si alguien quiere conectar con un servidor DDE que esta en un Windows
NT, es algo (no mucho) mas complicado,pero tambien mas divertido.

Xavier