تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ظهور الاسماء بشكل غريب
#1
السلام عليكم اخوتى.
جلبت مواضيع من هذا الموقع https://www.muhtwa.com/aqwal/amthal/


 لكن الكلام ظهر بشكل غريب هكذا






وهكذا الكود المستعمل


كود :
  Dim url As String = ("https://www.muhtwa.com/aqwal/amthal/") '& i
       Dim wc As New WebClient
       wc.Headers.Add("user-agent", "Mozilla/5.0")
       wc.Encoding = Encoding.Default
       Dim html As String = wc.DownloadString(url)
       Dim doc As New HtmlAgilityPack.HtmlDocument
       doc.LoadHtml(html)
       For Each n As HtmlAgilityPack.HtmlNode In doc.DocumentNode.SelectNodes("//h2[@class='entry-title']/a")
           ListBox1.Items.Add(n.InnerText.Trim)
           lst.Add("https://www.muhtwa.com/" & n.Attributes("href").Value)

           Me.Text = ListBox1.Items.Count
       Next


وكلما حاولت بالويب براوزر يتم اغلاق البرنامج حين الدخول للموقع
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

احببت ان اضع حل لتلك امشكلة بطرية مختلفة
عن لفكرة الاعتيادية بطريقة الـ Replace
حتى تتمكن من الاستادة منها فى اى شى اخر ليس فى امور الويب فقط

اليك الكود بعد التعدل عليه : مرفق الكود لتجنب جمل ترميز windows-1252

تحياتى لك
وتمنياتى لك التوفيق


الملفات المرفقة
.txt   codeEdit.txt (الحجم : 1.67 ك ب / التحميلات : 8)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة:
#3
(20-12-18, 06:04 PM)elgokr كتب :
وعليكم السلام ورحمة الله وبركاته

احببت ان اضع حل لتلك امشكلة بطرية مختلفة
عن لفكرة الاعتيادية بطريقة الـ Replace
حتى تتمكن من الاستادة منها فى اى شى اخر ليس فى امور الويب فقط

اليك الكود بعد التعدل عليه : مرفق الكود لتجنب جمل ترميز windows-1252

تحياتى لك
وتمنياتى لك التوفيق

جزاك الله كل خير اخى الجوكر...
انظر ماذا حدث

الرد
تم الشكر بواسطة: elgokr
#4
السبب يرجع لكونك اخت الكود من امتصفح
بعد عرض محتوى المرفق بالمتصفح لديك

الافضل ان تقوم بتحميل الملف
وفتح الملف بالجهاز ومن ثم نسخ ما بداخل الملف
لتتجنب الرموز كما ظهر معك بالصورة  Big Grin

على اى حال تم عمل مثال مرفق + السورس
مع بعض اللمسات على الكود ستجد الشرح باعلى كل جزء مضاف ومعدل بالكود

السورس (2015)

تحياتى لك
وتمنياتى لك التوفيق


الملفات المرفقة
.zip   Pro Get Data Site.zip (الحجم : 60.12 ك ب / التحميلات : 5)
.zip   Get Data Site.zip (الحجم : 65.89 ك ب / التحميلات : 5)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: ابو روضة
#5
(20-12-18, 10:55 PM)elgokr كتب :
السبب يرجع لكونك اخت الكود من امتصفح
بعد عرض محتوى المرفق بالمتصفح لديك

الافضل ان تقوم بتحميل الملف
وفتح الملف بالجهاز ومن ثم نسخ ما بداخل الملف
لتتجنب الرموز كما ظهر معك بالصورة  Big Grin

على اى حال تم عمل مثال مرفق + السورس
مع بعض اللمسات على الكود ستجد الشرح باعلى كل جزء مضاف ومعدل بالكود

السورس (2015)

تحياتى لك
وتمنياتى لك التوفيق

ماشاء الله عليك أخى انت فعلا رجل المهمات الصعبة..
بارك الله فيك وجزاك كل الخيرات.
الرد
تم الشكر بواسطة: elgokr , elgokr
#6
تقبل الله منك الدعاء
والامر بسيط اخى ابو روضة
فقط يحتاج الى بعض التركيز فقط
لذلك احب ان انوع معك بعض الردود المختلفة احياناً 
لتعداد على حلول مختلة تساعدك مستقبلياً

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: ابو روضة
#7
(21-12-18, 12:23 AM)elgokr كتب :
تقبل الله منك الدعاء
والامر بسيط اخى ابو روضة
فقط يحتاج الى بعض التركيز فقط
لذلك احب ان انوع معك بعض الردود المختلفة احياناً 
لتعداد على حلول مختلة تساعدك مستقبلياً

تحياتى لك
وتمنياتى لك التوفيق

حبيبى قلبى يا ايها الجوكر والله ربنا يحفظك
الرد
تم الشكر بواسطة: elgokr



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم