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

طبعا حتى لااعيد الطلب واثقل عليكم اريد البحث بين رموز مثلا
إقتباس :<![CDATA[welcome here]]>
جملة welcome here
اريد معرفة الموضع بالشرح المفصل
لا اريد كود وانما شرح حفظكم الله تعالى
ادري انه يوجد شرح بالمنتدى لكن لم اوفق الى فهمه
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله
أخي سعود :
شــــــرح الــتعـــــــــابير القيـاســــــــــية

Regular expression
Abu Ehab : Microsoft Partner  & Systems Developer
 Youtube   Facebook    Twitter   
الرد }}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته

فعلاً هذه اللغة معقدة جداً وهنيئاً للذي يفهمها فهي تؤدي أغلب الأعمال التي تريد تنفيذها (إذا فهمت صح كيف تستخدمها)

لي محاولات صغيرة معها وقد استفدت من مشاركات الأخوين (Ramilove و أحمد الحربي)

علي العموم هذه طريقة مبسطة لعمل ما تريد :

نستود مجال الأسماء :
كود :
Imports System.Text.RegularExpressions

الكود :
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


        ' الباترن هو ما نريد البحث عنه بإدخال الرموز التي تفهما اللغة
        Dim Patren As String = "(<!\[CDATA\[(.*)\]\]>)"
        ' الأقواس المعقوفة وضعتها عشان يعتبر كل النص مجموعة واحدة
        ' كذلك وضعت أقواس معقوفة حول النص الذي تريد استخراجه لأنه سيفيدنا لاحقا كما سنرى
        ' لو لاحظت وضعت علامة الإسلاش أما الأقواس المربعة
        ' ذلك لأنها من الرموز المحجوزة للغة
        ' وبعدين وضعت بدل النص الذي تريد استخراجه نقطة ونجمة يعني أبحث عن أي شيء في هذا المكان بالتحديد


        '\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
        ' إنشاء كلاس البحث ونعطيه النص الذي نريد البحث فيه
        ' وكذلك الباترن
        'علي ما أعتقد تعني البحث في أي حالة من حالات الأحرف RegexOptions.IgnoreCase الـ
        Dim Mc As MatchCollection = Regex.Matches("[b][color=#b22222]Put Text Here[/color][/b]", Patren, RegexOptions.IgnoreCase)


        ' التحقق من احتواء الكلاس علي نتيجة
        If Mc.Count > 0 Then


            ' حلقة للمرور علي النتائج
            For i As Integer = 0 To Mc.Count - 1
                ' كما قلت سابقا وضعت الأقواس المعقوفة في الباترن لجعل النص في قروبات وهنا سنستفيد من ذلك
                ' هنا سنعرض القروبات المحتملة من 0 إلي 3 مثلاً ونجرب إذا وجدنا أحد القروبات يحوي النتيجة
                ' طبعاً إذا ما وجد نتيجة في القروبات من 0 إلي 3 ممكن نضيف قروبات أخرى 4 و 5 و 6 حتى نصل لنتيجة
                ' في هذا المثال النتيجة موجودة في القروب رقم 2 يعني ممكن تحذف الأول والثاني
                ' يمكنك بعد ذلك إسناد النتيجة لمربع نص أو أي شئ آخر
                MsgBox(Mc(i).Groups(0).Value, MsgBoxStyle.Exclamation, "Groups 0") ' يمكنك أن تحذف هذا
                MsgBox(Mc(i).Groups(1).Value, MsgBoxStyle.Exclamation, "Groups 1") ' وهذا أيضاً
                MsgBox(Mc(i).Groups(2).Value, MsgBoxStyle.Exclamation, "Groups 2") ' اترك هذا لاحتوائه علي النص المطلوب
            Next i
        End If
    End Sub

في مكان الـ Put Text Here ضع النص الذي تريد البحث ضمنه مثلا تضع نصك السابق اللي تحت :
كود :
[color=#333333][FONT=Verdana][i]<![CDATA[welcome here]]>[/i][/FONT][/color]

لو لاحظت أنا تركت القروبات الثلاثة في المثال (كان ممكن أحذف الأول والثاني وأترك الثالث) لكن فضلت تركها عشان تعرف أنني بعرف النتيجة بتلك الطريقة المملة

أحيانا لو النص متشعب قد تصل القروبات إلي 10 أو أكثر حتى تأتي بالنتيجة المطلوبة

طبعا اللي يفهم هذه اللغة قد يجد طريقة أسرع وأفضل من هذه Smile
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}
تم الشكر بواسطة:
#4
نحمده ونصلي على رسوله الكريم
سلسلة تعلم ال Regular Expressions

إقتباس :فعلاً هذه اللغة معقدة جداً
الله يعطيك العافيه، ما فيه شكر تحت مشاركتك....
الرد }}}
تم الشكر بواسطة:
#5
Abu Ehab كتب :السلام عليكم ورحمة الله
أخي سعود :
شــــــرح الــتعـــــــــابير القيـاســــــــــية

Regular expression
بارك الله فيك اخي الكريم
المثال لدي وقد قمت بقرائته عدة مرات لكن الذي اريده هو البحث عن محتوى بمربع نص ..هل تعرف ملف اللغة لمنتديات vbulletin اريد قراءة محتواها ضمن مربع نص وهذه سهلة لكن كيف ابحث ضمنها
الرد }}}
تم الشكر بواسطة:
#6
بارك الله فيك اخي [b]kslawy[/b]
Put Text Here

هل يمكن وضع بدل الجملة textbox2.text مثلا!؟
الرد }}}
تم الشكر بواسطة:
#7
DreamsDotNet كتب :نحمده ونصلي على رسوله الكريم
سلسلة تعلم ال Regular Expressions

الله يعطيك العافيه، ما فيه شكر تحت مشاركتك....

بارك الله فيك اخي الكريم .. هو ذاته الموضوع حببني بهذه اللغة لكن لم افهمSad السر في انا شخصيا.
حاولت استبدال النص الذي بين علامتي تنصيص باداة مربع نص لكن!!
الرد }}}
تم الشكر بواسطة:
#8
طيب اخواني هل بامكان احدكم برمجة برنامج يقوم بترجمة ملفات اللغة لمنتديات vbulletin ؟؟
نريد ان نجعل امر التعريب متوفر لدى الكل ومن مبرمجي فيجوال بيسك دوت نت.
هذا خلاصة مااريد تطبيقه لكن يبدوا ان الامر ليس بالامر الهين.
الرد }}}
تم الشكر بواسطة:
#9
نحمده ونصلي على رسوله الكريم

ممكن اشارك معك ونعمل المشروع، بس المشكلة ما عندي ايا معلومة عن الموضوع
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال بسيط يا احبتى فى الله خالد كامل1 4 314 07-01-24, 12:55 AM
آخر رد: Mujahef
Tongue استفسار بسيط عن كريستال ريبورت waataanys 1 311 30-11-23, 04:44 PM
آخر رد: Taha Okla
  data type mismatch in criteria expression access um_noor20 3 438 08-10-23, 10:14 AM
آخر رد: um_noor20
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 349 05-08-23, 02:29 PM
آخر رد: moh61
  يوجد خطاء عند تحميل الفورم - مثال شجرة الحسابات new_programer 6 756 11-06-23, 06:47 PM
آخر رد: new_programer
  يوجد خطاء عند فتح الفورم مثال شجرة الحسابات new_programer 2 564 06-06-23, 02:41 PM
آخر رد: new_programer
  مثال حفظ فاتورة المشتريات بكامل التفاصيل +اجراء مخزن -الكود محتاج تعديل new_programer 5 715 12-05-23, 09:25 PM
آخر رد: new_programer
  مثال بسيط لربط قواعد mySql مع Vb.net atefkhalf2004 2 396 17-04-23, 01:03 AM
آخر رد: atefkhalf2004
  تعديل على مثال رصد الدرجات مصمم هاوي 13 1,007 15-01-23, 12:21 AM
آخر رد: مصمم هاوي
  قاعدة بيانات مع ادراج الصور رائعة جدا مع خطأ بسيط .. مساعدة Tajaldeen 0 397 21-12-22, 07:11 AM
آخر رد: Tajaldeen

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


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