Winsock.SendData problem with strings*unresolved*

[Booda]

Hi all just a quick question:
Can you send a string using senddata through a network

Private Sub Runner_Timer()
Dim Sendoff As String
 
    Info = Time
    lblInfo.Caption = Info
    lblCompNam.Caption = ComputerNME
    lblIP.Caption = IP
    Sendoff = Info & "*" & ComputerNME & "*" & IP
    Winsuck.SendData Sendoff
End Sub

I keep on getting a error "Wrong protocol or connection state for the requested transaction or state"
I am using TCP, I know it works in UDP.
anybody have any clues

Thanks in advance