منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : أستفسار عن اتصال الكلاينت .. يوجد خطأ
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
سلام عليكم ..... انا استخدم الاتصال هذا dim client as new tcpclient()

وهذا الكود :

كود :
dim ip as string = "109.224.36.50"
dim port as integer = 8080
dim Host as string = "x.xxx.com" 'هذا هوست السرفر اللي بتصل بيه

client.Connect("ip", port)
        Dim ns As NetworkStream = client.GetStream()
        ' Do a simple write.
        Dim sendBytes As [Byte]() = Encoding.ASCII.GetBytes("CONNECT " & Host & ":" & Hostport & " HTTP/1.1" & ControlChars.CrLf & "Host: " & Host & ":" & Hostport & ControlChars.CrLf & ControlChars.CrLf)
        ns.Write(sendBytes, 0, sendBytes.Length)

انا اريد الاتصال بـ الهوست xx.xxx وانا بالفعل اتصل بيه وكل شي مية مية .... لاكن لما بدي اتصل بيه عن طريق :

اتصال الكلاينت بالبروكسي https او socket4 او الـ 5 بعدها الاتصال مع الهوست ... فأنا بحثت كثيرأ بمواقع الاجنبية لقيت هذا الكود ... لاكن هذا الكود عند يجي يتصل client.Connect("ip", port) وال ip موجود بيه اي بي البروكسي ما يتصل يقول لا يوجد رد Sad بليز ساعدوني ...

ملاحظة انا استخدمت كثير من اي بي البروكسيات ولا يفلح وحده منهم Sad
ونسيت اكتب بالكود هذا :

Dim Hostport as integer = هذا بورت للهوست اللي رح اتصل فيه
بليز يالخبراء رد Sad حتى ولو ما فهمتو