[اليوم السابع]

(02-05-20, 03:39 AM)aljzazy كتب : استخدم WebRequest

---

كود :

Dim errorString As String = "errorString=test string"
   Dim request As WebRequest = WebRequest.Create("http://127.0.0.1/test.php")

   request.Method = "POST"
   Dim byteArray As Byte() = Encoding.UTF8.GetBytes(errorString)
   request.ContentType = "application/x-www-form-urlencoded"
   request.ContentLength = byteArray.Length
   Dim dataStream As Stream = request.GetRequestStream()
   dataStream.Write(byteArray, 0, byteArray.Length)
   dataStream.Close()
   Dim response As WebResponse = request.GetResponse()
   dataStream = response.GetResponseStream()
   Dim reader As New StreamReader(dataStream)
   Dim responseFromServer As String = reader.ReadToEnd()
   reader.Close()
   dataStream.Close()
   response.Close()
   MsgBox(responseFromServer)

انا وضعت الملف بجانب المشروع
ولكن ظهر هذا الخطأ وغالبا بسبب ان انا ليس منصب اي برامج لعمل سيرفر محلي علي جهازي