تقييم الموضوع :
  • 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
الله يسلمك يارب اخى وحبيبى

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

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

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation [VB.NET] اصطياد رسالة الخطأ دون يتوقف البرنامج sniperjawadino 3 75 21-02-19, 04:12 PM
آخر رد: elgokr
Exclamation [VB.NET] أين الخطأ في مشروعي abarrak 3 119 11-02-19, 12:41 PM
آخر رد: ابراهيم ايبو
  ممكن طريقة انهاء يومية للكاشير atef_020 14 483 22-01-19, 03:58 AM
آخر رد: asemshahen5
  ممكن رد عل هذا السؤال fouadhdfouad 3 154 10-01-19, 09:16 PM
آخر رد: princelovelorn
  ممكن حل الاسئله بلغة بيسك HudaALslman 1 151 04-01-19, 03:01 PM
آخر رد: اسامه الهرماوي
  [سؤال] ممكن حل لمشكلة الرفع في فجوال بيسك A12 1 132 29-12-18, 02:17 PM
آخر رد: اسامه الهرماوي
  ممكن حل السؤال HudaALslman 2 194 15-12-18, 03:59 PM
آخر رد: HudaALslman
  [VB.NET] ممكن كود تسجيل الدخول لموقع تويتر عبر httpwebrequst الماجيك مسعد 4 246 08-12-18, 02:24 AM
آخر رد: الماجيك مسعد
Photo اين الخطأ في الكود لو سمحتم samira20 6 240 01-12-18, 01:55 PM
آخر رد: asemshahen5
Photo اين الخطأ في الكود لو سمحتم samira20 0 124 30-11-18, 11:08 AM
آخر رد: samira20

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


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