السلام عليكم
يوجد مشكلة واجهتني عن ارسال نص عربي من خلال الWebRequest بان العربي يصل كانه utf
الكود المستخدم
Function ExecuteURL(ByVal strURI As String) As String With WebRequest.Create(New Uri(strURI)) With New StreamReader(.GetResponse.GetResponseStream(), Text.Encoding.GetEncoding(1256)) ExecuteURL = .ReadToEnd() End With End With
الاستخدام
Dim UrlExecuted As String = "http://www.myweb.com/mypage.aspx?mystring=عربي" ExecuteURL(UrlExecuted)