22-04-19, 01:23 AM
(22-04-19, 12:30 AM)ابو روضة كتب :ماشاء الله عليك أخى جوكر فنان ..لو سمحت أخى حينما فعلت هذا وسحبت مستند نصى به حروف عربية بتظهر لى مشوشة كلهاوبتظهر بلغة غريبة جدا فهل هناك حل
تسلم اخى ابو روضة
يرجع الامر هنا لان محتوى الملف عربي
ولكن الملف عند الحفظ تم حفظه على PHP كود :
Encoding: ANSI
ولحل المشكلة يفضل اعادة حفظ الملف ليكون
PHP كود :
Encoding: UTF-8
وكذلك يمكنك تعديل الكود فى الشرح على هذا الجزء
كود :
Dim FileSR As IO.StreamReader
FileSR = System.IO.File.OpenText(OFD.FileName)
TextBox1.Text = FileSR.ReadToEnd()
FileSR.Close()
ليصبح بهذا الشكل
كود :
Dim FileSR As IO.StreamReader = New IO.StreamReader(OFD.FileName, System.Text.Encoding.GetEncoding("windows-1256"))
TextBox1.Text = FileSR.ReadToEnd()
FileSR.Close()
يمكنك تعديل windows-1256 الى 1256 فقط يمكنك مراجعة الرابط هنا للمزيد
أو بهذا الشكل
كود :
Dim FileSR As IO.StreamReader = New IO.StreamReader(OFD.FileName, System.Text.Encoding.Default)
TextBox1.Text = FileSR.ReadToEnd()
FileSR.Close()
مع تغيير Default الى
كود :
ASCII - Unicode - UTF32 - UTF7 - UTF8
ويفضل ان يكون على الافتراضي لان بكلا الحالات
ستحتاج على تعديل حفظ الملف كما تم ذكره بالاعلى
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية