[VB.NET] طلب عمليه دخول واضافه يوزر جديد

كود :

Dim postData As String = "admin=" & TextBox1.Text & "&pass=" & TextBox2.Text

        Dim tempCookies As New CookieContainer

        Dim encoding As New UTF8Encoding

        Dim byteData As Byte() = encoding.GetBytes(postData)

        Dim postReq As HttpWebRequest = DirectCast(WebRequest.Create("http://127.0.0.1/admin/index.php"), HttpWebRequest)

        postReq.Method = "POST"

        postReq.KeepAlive = True

        postReq.CookieContainer = tempCookies

        postReq.ContentType = "application/x-www-form-urlencoded"

        postReq.Referer = "http://127.0.0.1/admin/index.php"

        postReq.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 6.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/4.0 (.NET CLR 3.5.30729)"

        postReq.ContentLength = byteData.Length

        Dim postreqstream As Stream = postReq.GetRequestStream()

        postreqstream.Write(byteData, 0, byteData.Length)

        postreqstream.Close()

        Dim postresponse As HttpWebResponse

        postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)

        tempCookies.Add(postresponse.Cookies)

        logincookie = tempCookies

        Dim postreqreader As New StreamReader(postresponse.GetResponseStream())

        Dim thepage As String = postreqreader.ReadToEnd

        ' RichTextBox1.Text = thepage

كود :

Dim postData As String = "user=" & TextBox3.Text & "&password=" & TextBox4.Text

      Dim tempCookies As New CookieContainer

      Dim encoding As New UTF8Encoding

      Dim byteData As Byte() = encoding.GetBytes(postData)

      Dim postReq As HttpWebRequest = DirectCast(WebRequest.Create("http://127.0.0.1/admin/add.php"), HttpWebRequest)

      postReq.Method = "POST"

      postReq.KeepAlive = True

      postReq.CookieContainer = tempCookies

      postReq.ContentType = "application/x-www-form-urlencoded"

      postReq.Referer = "http://127.0.0.1/admin/add.php"

      postReq.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 6.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/4.0 (.NET CLR 3.5.30729)"

      postReq.ContentLength = byteData.Length

      Dim postreqstream As Stream = postReq.GetRequestStream()

      postreqstream.Write(byteData, 0, byteData.Length)

      postreqstream.Close()

      Dim postresponse As HttpWebResponse

      postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)

      tempCookies.Add(postresponse.Cookies)

      logincookie = tempCookies

      Dim postreqreader As New StreamReader(postresponse.GetResponseStream())

      Dim thepage As String = postreqreader.ReadToEnd