Socket connection using proxy problem

[kam]

Hello,

I would like to create a program that connect to a proxy server using Socket, and return the data from the 3rd Server. But I do not know how to do so.

Like below

My computer -> Proxy Server [216.139.217.135:8080] -> ServerUrl [information server (210.10.0.15:2500)]


Here is the code which request data directly from 210.10.0.15:2500

Dim s As Socket = Nothing
s = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
s.Connect(New IPEndPoint(Dns.Resolve(ServerUrl).AddressList(0), 2500))
s.Send(Encoding.ASCII.GetBytes(txtquery.text + ControlChars.CrLf))

Please help me~

Thanks

Kam