تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ما هو الخطأ بالكود
#1
ما هو الخطأ بهذا الكود وكيف اصلاحه ؟؟
كود :
Imports System.Net
Imports System.IO
Imports System.Text

Public Class Form1
   Private Property logincookie As CookieContainer
   Private cCookc As New CookieContainer()
   Private postData As String
   Private encoding As New UTF8Encoding
   Private byteData As Byte()
   Private postReq As HttpWebRequest
   Private postreqstream As Stream
   Private postresponse As HttpWebResponse
   Dim CI As Integer
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       For ss = 0 To ListBox1.Items.Count
           ServicePointManager.DefaultConnectionLimit = Integer.MaxValue
           CheckForIllegalCrossThreadCalls = False
           Dim user1 As String = ListBox1.SelectedItem
           Dim d() As String = user1.ToString.Split(":")
           CI = d(1)
           Dim tempCookies As New CookieContainer
           postReq = DirectCast(WebRequest.Create("https://www.website.com"), HttpWebRequest)
           postReq.Method = "GET"
           postReq.KeepAlive = True
           postReq.CookieContainer = logincookie
           postReq.ContentType = "application/x-www-form-urlencoded"
           postReq.Referer = "https://www.website.com"
           postReq.UserAgent = "Mozilla/5.0 (Windows NT 5.1; rv:52.0) Gecko/2010010 Firefox/52.0"
           postReq.Proxy = New WebProxy(d(0), CI)
           postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)
           logincookie.Add(postresponse.Cookies)
           logincookie = logincookie
           Dim postreqreader As New StreamReader(postresponse.GetResponseStream())
           Dim thepage As String = postreqreader.ReadToEnd
           ListBox1.SelectedIndex += 1
       Next
   End Sub
End Class

[صورة مرفقة: p_1583w56341.gif]
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم