Hello there.

I am having REAL trouble connectling through a socks 4 proxy server using winsock. I have read the RFC @ http://www.socks.nec.com/protocol/socks4.protocol and from what I can see with my code I have made no errors. But when I connect to the proxy server (I should get a response back when I send the data) and send the data telling it to connect to the remote PC, I get nothing. I send the data "14230062.112.202.23" and I have even tried "14230062.112.202.23MeNULL", no change. Here is the whole lot of code I have (very basic, its just to test it):

Private Sub Command1_Click()
Winsock1.Connect "90.0.0.1", 1080

Do Until Winsock1.State = sckConnected
DoEvents: DoEvents: DoEvents: DoEvents
If Winsock1.State = sckError Then
MsgBox "Problem connecting!"
Exit Sub
End If
Loop

Winsock1.SendData "14230062.112.202.23" '(or "14230062.112.202.23MeNULL"
End Sub


Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Winsock1.GetData strData
MsgBox strData
End Sub

I hope someone who may understand the RFC better than me an tell me where I am going wrong.

Thanks for reading this rather long winded problem

Will (aka Degu)