تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن أعرف ما هو الخطأ فى هذا الباترين
#1
السلام عليكم اخوتى
الموضوع بقالى ساعات بحاول معاه عشان افهم ايه الخطأ ومش عارف 
مع ان الباترين فى الموقع صحيح لكن فى البرنامج بيظهر خطأ.
فمش عارف أجيب رابط الصورة وأعرضها داخل البيكتشر بوكس

كود :
Dim wc As New WebClient
       Dim sourceString As String = wc.DownloadString("https://www.storiesrealistic.com/قصص-واقعية-عن-الظلم/".Replace("\", ""))
       Dim s As String = Regex.Match(sourceString, "https?:\/\/w{3}\.storiesrealistic\.com\/(.+?)\jpg").Groups(1).Value
       PictureBox1.Load(s)

وهذا الباترين

كود :
https?:\/\/w{3}\.storiesrealistic\.com\/(.+?)\jpg

الصورة تبين ان الباترين صحيح

الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

مرحباً اخى ابو روضة
المشكلة لديك فقط فى هذا الجزء
كود :
\j

ويفضل استخدام الكود بهذا الشكل
كود :
       Dim wc As New WebClient
       Dim sourceString As String = wc.DownloadString("https://www.storiesrealistic.com/قصص-واقعية-عن-الظلم/".Replace("\", ""))
       Dim s As String = Regex.Match(sourceString, "https?:\/\/w{3}\.storiesrealistic\.com\/(.+?).jpg").Value
       PictureBox1.Load(s)

تم حذف .Groups(1) لاتمام جلب الرابط كاملاً للصورة
الا اذا كنت ستقوم بتحميل الصورة بجانب البرنامج من ثم عرضها فى PictureBox1

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

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


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

مرحباً اخى ابو روضة
المشكلة لديك فقط فى هذا الجزء
كود :
\j

ويفضل استخدام الكود بهذا الشكل
كود :
       Dim wc As New WebClient
       Dim sourceString As String = wc.DownloadString("https://www.storiesrealistic.com/قصص-واقعية-عن-الظلم/".Replace("\", ""))
       Dim s As String = Regex.Match(sourceString, "https?:\/\/w{3}\.storiesrealistic\.com\/(.+?).jpg").Value
       PictureBox1.Load(s)

تم حذف .Groups(1) لاتمام جلب الرابط كاملاً للصورة
الا اذا كنت ستقوم بتحميل الصورة بجانب البرنامج من ثم عرضها فى PictureBox1

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



حمدلله على السلامة أخى...
أظن أن الحل كان فى الترميز أخى لذا قمت بفضل الله بعملها هكذا بعد تعب كبير

كود :
 Dim wc As New WebClient
       wc.Encoding = Encoding.UTF8
       Dim sourceString As String = wc.DownloadString(TextBox3.Text)
       Dim patren As String = Regex.Match(sourceString, "https?:\/\/\w{3}\.\w+\.\w+\/\w+-\w+\/\w+\/\d{4}\/\d{2}\/[ء-ي].+\.\w{3}").Value
       PictureBox1.Load(patren)
الرد
تم الشكر بواسطة: elgokr
#4
الله يسلمك يارب اخى وحبيبى

وجميل ما تقوم به من توضيح لما توصلت اليه
حتى تعم الفائدة للجميع

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

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن حل السؤال HudaALslman 1 63 10-12-18, 06:16 AM
آخر رد: rmnr
  [VB.NET] ممكن كود تسجيل الدخول لموقع تويتر عبر httpwebrequst الماجيك مسعد 4 130 08-12-18, 02:24 AM
آخر رد: الماجيك مسعد
Photo اين الخطأ في الكود لو سمحتم samira20 6 129 01-12-18, 01:55 PM
آخر رد: asemshahen5
Photo اين الخطأ في الكود لو سمحتم samira20 0 43 30-11-18, 11:08 AM
آخر رد: samira20
Photo ممكن حل لمشكلة رسالة التفعيل للديف اكسبرس سلامه محمد11 1 54 26-11-18, 03:15 AM
آخر رد: elgokr
  ممكن اعرف ما هو باترين هذا الرابط ابو روضة 2 118 24-11-18, 12:22 AM
آخر رد: ابو روضة
  [سؤال] استاذ عبد العزيز البسكري وحريف برمجة ممكن سؤال اسامه الهرماوي 7 145 23-11-18, 07:40 PM
آخر رد: اسامه الهرماوي
  [سؤال] ما الخطأ في الكود التالي اسامه الهرماوي 2 87 23-11-18, 05:52 PM
آخر رد: Rabeea Qbaha
  [سؤال] ما الخطأ في هذا الكود اسامه الهرماوي 3 96 21-11-18, 02:05 AM
آخر رد: اسامه الهرماوي
  مش عارف الخطأ فين احمد خطاب 5 111 20-11-18, 01:22 AM
آخر رد: احمد خطاب

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


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