Sende data til en Winsocket Server. Hvordan gøres det!

Har ledt efter en måde at sende data fra f.eks. en alm. form på en hjemmeside til en Winsocket Server.

Data'er skal håndtere af et program, så det eneste jeg skal bruge, er en måde af aflevere disse data til programmet. Jeg skal også kunne få nogle data med retur, som programmet skal give mig. Altså et slags svar, på de data jeg sender til programmet fra webformularen.

Jeg har kigget lidt på MsWinSocket, og tænker om jeg kan bruge det til at oprette forbindelse til programmet. Programmet der skal modtage data'erne har en indbygget WinSocket Server i sig.

Jeg har forsøgt mig med følgende kode :

-----------------------
<%
'declare variables
dim wsock
dim rtnStr

'set up socket
set wsock = createobject("MSWinsock.Winsock")
  wsock.localport = 2499
  wsock.remoteport = portnummer på serveren
  wsock.remotehost = "Serverens IP nummer"
  wsock.connect
   
  if wsock.state = sckConnected then
      response.write("Connected on port: " & wsock.LocalPort)
      rtnStr = "Hello world!"
      wsock.SendData rtnStr
  end if
   
  do until wsock.bytesReceived <> false   
      if wsock.bytesReceived = true then
          dim strData
          wsock.GetData strData, vbString
          response.write(strData)
          wsock.close
      end if
  loop

%>
------------------------



Jeg er klar over at dette kræver MSWinsock komponent.
Den jeg har fundet, på en meget mærkelig side, melder dog følgende fejl når den bruges :

"Klassen er ikke licenseret til brugeren"

Hvad betyder det mere præsist? Og hvor finder man MSWinSocket Komponenten officielt?

Jeg har en del erfaring med ASP Scripting, men har aldrig prøve at programmere en forbindelse til en anden server. Bortset fra MySQL og Access.

Mvh.
Lasse.