السلام عليكم ورحمة الله وبركاتة
اخباركم اخواني ان شاءلله بخير
اخواني انا عندي مشروع بسيطط
المشروع تكمن فكرته كتالي
1:تسجيل دخول عبر لوحة التحكم
2:اضافة مستخدم جديد
لاكن المشكلة هنا ان عمليه تسجيل الدخول تمت ولاكن المشكله الاخرى هي ان عمليه الطلب الاخر وهو تنفيذ يوزر جديد لم تنفذ بسبب الكوكيز ويطلب المستخدم من والباسورد من جديد
مثااال
في البدايه الاستخدام HttpWebRequest
عندي في الطلب الاول login وراح تكون قيمه البوست
[JS]Dim postData As String = "admin=" & TextBox1.Text & "&pass=" & TextBox2.Text
[/JS]
تماام في عمليه الطلب الاول اريده ان يتم حفض الكوكيز حتا استطيع الدخول الى الصفحة الاخرى وهي
تحمل البوست التالي
[JS] Dim postData As String = "user=" & TextBox3.Text & "&password=" & TextBox4.Text
[/JS]
يعني الفكره بتكون بعمليه طلبين post في وقت واحد
مجرد مل
login
TextBox1.text = "admin"
TextBox2.Text= "pass"
add users
TextBox3.Text "user1"
TextBox3.Text "pass"
اذا في مثال يعمل طلبين post مع حفض الكوكيز بطلب الكوكيز اتمنا تزويدنا به وشكرا لكم
Login
add user
كمثال ^
الفكره كلها اريد عمل برنامج يتحكم في لوحة التحكم الخاصه بموفعي من اضافه يوزر جديد الى اضافه موضوع جديد
اخباركم اخواني ان شاءلله بخير
اخواني انا عندي مشروع بسيطط
المشروع تكمن فكرته كتالي
1:تسجيل دخول عبر لوحة التحكم
2:اضافة مستخدم جديد
لاكن المشكلة هنا ان عمليه تسجيل الدخول تمت ولاكن المشكله الاخرى هي ان عمليه الطلب الاخر وهو تنفيذ يوزر جديد لم تنفذ بسبب الكوكيز ويطلب المستخدم من والباسورد من جديد
مثااال
في البدايه الاستخدام HttpWebRequest
عندي في الطلب الاول login وراح تكون قيمه البوست
[JS]Dim postData As String = "admin=" & TextBox1.Text & "&pass=" & TextBox2.Text
[/JS]
تماام في عمليه الطلب الاول اريده ان يتم حفض الكوكيز حتا استطيع الدخول الى الصفحة الاخرى وهي
تحمل البوست التالي
[JS] Dim postData As String = "user=" & TextBox3.Text & "&password=" & TextBox4.Text
[/JS]
يعني الفكره بتكون بعمليه طلبين post في وقت واحد
مجرد مل
login
TextBox1.text = "admin"
TextBox2.Text= "pass"
add users
TextBox3.Text "user1"
TextBox3.Text "pass"
اذا في مثال يعمل طلبين post مع حفض الكوكيز بطلب الكوكيز اتمنا تزويدنا به وشكرا لكم
Login
كود :
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
add user
كود :
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
كمثال ^
الفكره كلها اريد عمل برنامج يتحكم في لوحة التحكم الخاصه بموفعي من اضافه يوزر جديد الى اضافه موضوع جديد