منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم بحاول أتعلم الريجيكس بقالى يومين لكن وجهتنى مشكلة بسيطة فى باتيرين. فانا بتدرب على جلب باترين اى صورة حاليا لتجلب لى الصورة داخل PictureBox وحاولت مؤخرا جلب رابط صورة العضو asemshahen5 كتدريب ليس أكثر لكن مش عارفة ما هو الخطأ هنا

PHP كود :

Dim wc As New WebClient
        Dim sourceString As String = wc.DownloadString("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673")
        Dim s As String = Regex.Match(sourceString, """<img src=""(.+?)_30786\.png?dateline=1527779351""").Groups(1).Value
        PictureBox1.Load(s) 

بحاول أجلب رابط الصورة من هذا الموضوع
http://vb4arb.com/vb/showthread.php?tid=...#pid130673

وعليكم السلام

اتفضل اخي

كود :

Dim token As String = httpRequest.Get("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673").ToString

            Dim access As String = New Regex("src=""(.*?)?dateline").Match(token).Groups(1).Value

            PictureBox1.Load(access.ToString)

(28-10-18, 12:54 AM)XBOOBX كتب : [ -> ]
وعليكم السلام

اتفضل اخي

كود :

Dim token As String = httpRequest.Get("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673").ToString Dim access As String = New Regex("src=""(.*?)?dateline").Match(token).Groups(1).Value PictureBox1.Load(access.ToString)

يوجد خطأ اخى الكريم

هل هناك مكتبة مثلا ناقصة ؟

(28-10-18, 01:01 AM)ابو روضة كتب : [ -> ]
(28-10-18, 12:54 AM)XBOOBX كتب : [ -> ]
وعليكم السلام

اتفضل اخي

كود :

Dim token As String = httpRequest.Get("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673").ToString Dim access As String = New Regex("src=""(.*?)?dateline").Match(token).Groups(1).Value PictureBox1.Load(access.ToString)

يوجد خطأ اخى الكريم

هل هناك مكتبة مثلا ناقصة ؟

اخي انا قصدت تستعمل الرابط مع الباترن في الكود الذي وضعتة انت

هذا

كود :

  Dim wc As New WebClient

        Dim sourceString As String = wc.DownloadString("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673")

        Dim s As String = Regex.Match(sourceString, "src=""(.*?)?dateline").Groups(1).Value

        PictureBox1.Load(s)

وهذا الكود كامل بدون اخطاء انت الذي وضعتة

(28-10-18, 01:04 AM)XBOOBX كتب : [ -> ]
(28-10-18, 01:01 AM)ابو روضة كتب : [ -> ]
(28-10-18, 12:54 AM)XBOOBX كتب : [ -> ]
وعليكم السلام

اتفضل اخي

كود :

Dim token As String = httpRequest.Get("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673").ToString Dim access As String = New Regex("src=""(.*?)?dateline").Match(token).Groups(1).Value PictureBox1.Load(access.ToString)

يوجد خطأ اخى الكريم

هل هناك مكتبة مثلا ناقصة ؟

اخي انا قصدت تستعمل الرابط مع الباترن في الكود الذي وضعتة انت

هذا

كود :

Dim wc As New WebClient Dim sourceString As String = wc.DownloadString("http://vb4arb.com/vb/showthread.php?tid=27125&pid=130673#pid130673") Dim s As String = Regex.Match(sourceString, "src=""(.*?)?dateline").Groups(1).Value PictureBox1.Load(s)

وهذا الكود كامل بدون اخطاء انت الذي وضعتة

lأعذرنى أخى انا لسة بتعلمها وفعلا كدة نجحت..
لو سمحت معلشى يا غالى
بحاول اجيب هذا الباترين من هذا الرابط لكن هناك خطا

PHP كود :

src="https://u.damasgate.com/001/3/7g97aqwraxrrkbubhc8h.jpg" 

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

كود :

src="https?:\/\/\w\.damasgate.com\/.+\.jpg"

فمعلش أخى ممكن حلها مع شرح بسيط عشان أفهم بس الله يكرمك

(28-10-18, 01:24 AM)ابو روضة كتب : [ -> ]

كود :

src="https?:\/\/\w\.damasgate.com\/.+\.jpg"

فمعلش أخى ممكن حلها مع شرح بسيط عشان أفهم بس الله يكرمك

اخي لاحض الصورة عند فتحها لا يفتح الموقع الى ان تضع بروكسي او تشغيل اضافة vpn

(28-10-18, 01:39 AM)XBOOBX كتب : [ -> ]
اخي لاحض الصورة عند فتحها لا يفتح الموقع الى ان تضع بروكسي او تشغيل اضافة vpn

ولا يهمك أخى عرفت أجلبها بفضل الله شكرا لك وجزاك الله كل خير

REGEX Tutorial Regular Expressions

REGEX Tutorial Regular Expressions Pt 2

REGEX Tutorial Regular Expressions Pt 3

(28-10-18, 08:56 AM)asemshahen5 كتب : [ -> ]REGEX Tutorial Regular Expressions

REGEX Tutorial Regular Expressions Pt 2

REGEX Tutorial Regular Expressions Pt 3

مع انى ضعيف فى الانجليزى لكن جزاك الله كل خير أستاذى العزيز الغالى