Winsocket and VB6.0

I am developing code such i want to connect it to server and store the data in server get the stored data from the server to my application

i must use Socket programming

plz can any one help me
code iz given below
itz not getting connected
Winsock1.RemoteHost = "203.208.144.52"
Winsock1.RemotePort = 80
Winsock1.Connect

If Winsock1.State = sckConnected Then
Label9.Caption = "Connected"
Winsock1.SendData Text1.Text & Text2.Text & xtra1.Text & xtra2.Text & xtra3.Text & xtra4.Text & xtra5.Text

Label9.Caption = "Sending data"

Else
Label9.Caption = "Not Connected to host"
End If

Winsock1.Close

[932 byte] By [pravin333] at [2008-2-2]