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


مثال 

: السلام عليكم مثال  مثال  مثال مثال test@gmail.com مثال مثال مثال مثال مثال 01000000 lمثال  test@hotmail.com مثال مثال مثال 

اريد استخرج من النص هذا مثلا رقم الهاتف والبريد فقط وحذف النص
الرد }}}
تم الشكر بواسطة: سعود , ابو ليلى
#2
ابحث في جوجل عن التالي
regex match email
regex match phone number
وستجد العديد من الامثلة

الرد }}}
تم الشكر بواسطة: سعود , ابو ليلى
#3
(20-05-20, 05:41 PM)معاند الحظ كتب : ابحث في جوجل عن التالي
regex match email
regex match phone number
وستجد العديد من الامثلة

للاسف كل الامثله بيقول لك اذا الاميل موجود في textbox ام لا انا اريد يمسح النص ويفضل الاميل فقط اذا معاك كود تساعدني بيه اكون مشكور لك
الرد }}}
تم الشكر بواسطة: ابو ليلى , ابو ليلى
#4
السلام عليكم و رحمة الله و بركاته
PHP كود :
Public Sub emas(ByVal text As String)
 
       Const MatchEmailPattern As String "(([\w-]+\.)+[\w-]+|([a-zA-Z]{1}|[\w-]{2,}))@" "((([0-1]?[0-9]{1,2}|25[0-5]|2[0-4][0-9])\.([0-1]?[0-9]{1,2}|25[0-5]|2[0-4][0-9])\." "([0-1]?[0-9]{1,2}|25[0-5]|2[0-4][0-9])\.([0-1]?[0-9]{1,2}|25[0-5]|2[0-4][0-9])){1}|" "([a-zA-Z]+[\w-]+\.)+[a-zA-Z]{2,4})"
 
       Dim rx As Regex = New Regex(MatchEmailPatternRegexOptions.Compiled Or RegexOptions.IgnoreCase)
 
       Dim matches As MatchCollection rx.Matches(text)
 
       Dim noOfMatches As Integer matches.Count

        For Each match 
As Match In matches
            MsgBox
(match.Value.ToString())
 
       Next
    End Sub 
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد }}}
#5
استخراج البريد الاليكترونى فقط من ملف وورد أو تكست فايل


الملفات المرفقة
.zip   WordExtractEmail.zip (الحجم : 966.81 ك ب / التحميلات : 2)
الرد }}}
#6
ولله كتر خيركو شباب شكرا جدا اقسم بالله مش عارف اشكركم ازاي
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجو التعديل على الدالة المرفقة - الدالة تعيد الرقم -1 new_programer 4 91 20-03-24, 01:18 PM
آخر رد: تركي الحلواني
  ارجو الافادة للضرورة mohamed sabry 1 110 13-01-24, 03:37 AM
آخر رد: Taha Okla
  ارجو المساعدة فى شاشة طباعة الباركود new_programer 10 577 09-01-24, 08:41 PM
آخر رد: new_programer
  المساعدة - في تفعيل نسخة VB 2015 emamtron2014 2 5,103 24-12-23, 05:08 AM
آخر رد: laban
  [نقاش] أساتذتنا مشرفى المنتدى المساعدة و الدعم فى Telerik dr.programming 6 381 21-12-23, 12:29 AM
آخر رد: dr.programming
  [سؤال] اخوان الاعزاء ارجو مساعدتى في حل عرض بيانات في تقرير كريستال ريبورت nazarakrawi 8 3,907 21-08-23, 11:11 PM
آخر رد: mohamed Matrix
  [SQL] يوجد لدى خطأبرمجى ارجو المساعدة عاصم النجار 6 503 26-07-23, 05:22 PM
آخر رد: عبد الخالق
  اخوانى الاحباب ارجو المساعدة فى كود النسخ واللصق mhareek 1 438 15-07-23, 02:52 PM
آخر رد: أبووسم
Lightbulb [VB.NET] سؤال وارجو المساعدة بخصوص عرض الصورة في تقرير كرستال younus 1 396 27-03-23, 10:13 PM
آخر رد: sanyor77
  الرجاء المساعدة المتألق9 0 364 15-03-23, 09:35 PM
آخر رد: المتألق9

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


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