[ali.anwer87]

(12-07-17, 01:59 AM)Ahmed_Mansoor كتب : أهلا أخي الكريم , تم تعديل الدالة وتسهيلها بشكل يقوم بتجاهل جميع الحروف سواء في البداية أو الوسط أو النهاية أو في أي مكان , قم بحذف الدالة التي وضعتها في المثال المعدل في ردي السابق بهذه الداله :

PHP كود :

Private Function Fix_SearchText(SearchText As String) As String

If Trim$(SearchText) = "" Then Exit Function

SearchText = Replace$(SearchText, "أ", "<(-A-)>")
SearchText = Replace$(SearchText, "إ", "<(-B-)>")
SearchText = Replace$(SearchText, "ا", "<(-C-)>")
SearchText = Replace$(SearchText, "ه", "<(-D-)>")
SearchText = Replace$(SearchText, "ة", "<(-E-)>")

SearchText = Replace$(SearchText, "<(-A-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-B-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-C-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-D-)>", "[" & "ةه" & "]")
SearchText = Replace$(SearchText, "<(-E-)>", "[" & "ةه" & "]")

Fix_SearchText = SearchText

End Function 


شكرا تعبتك وياية ربي يحفظك ويوفقك 
ما ضبطت معي

[sendbad100]

السلام عليكم  ورحمة الله وبركاته

يعطيك الف عافية     استاذ / أحمد منصور     

كود جميل جدا   الله يفتح عليك ويرزقك ويزيدك علم 

اعجبني جدا هذا الكود  - كنت استخدم كود طويل وملخبط    وغير مجدي 

تم تطبيقه على المثال السابق   مع زيادة حرفين "ي ى"

[ali.anwer87]

(12-07-17, 01:59 AM)Ahmed_Mansoor كتب : أهلا أخي الكريم , تم تعديل الدالة وتسهيلها بشكل يقوم بتجاهل جميع الحروف سواء في البداية أو الوسط أو النهاية أو في أي مكان , قم بحذف الدالة التي وضعتها في المثال المعدل في ردي السابق بهذه الداله :

PHP كود :

Private Function Fix_SearchText(SearchText As String) As String

If Trim$(SearchText) = "" Then Exit Function

SearchText = Replace$(SearchText, "أ", "<(-A-)>")
SearchText = Replace$(SearchText, "إ", "<(-B-)>")
SearchText = Replace$(SearchText, "ا", "<(-C-)>")
SearchText = Replace$(SearchText, "ه", "<(-D-)>")
SearchText = Replace$(SearchText, "ة", "<(-E-)>")

SearchText = Replace$(SearchText, "<(-A-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-B-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-C-)>", "[" & "أإا" & "]")
SearchText = Replace$(SearchText, "<(-D-)>", "[" & "ةه" & "]")
SearchText = Replace$(SearchText, "<(-E-)>", "[" & "ةه" & "]")

Fix_SearchText = SearchText

End Function
شكرا على الرد بس هم ماضبطت 

تعبتك شكرا على ردك 


[sendbad100]

وضعت لك مثال في المشاركة رقم 12

جربته او لم تجربه

[ali.anwer87]

(18-07-17, 05:44 PM)sendbad100 كتب : وضعت لك مثال في المشاركة رقم 12

جربته او لم تجربه

ما اشتغل جربته

[ali.anwer87]

(08-07-17, 03:18 PM)ali.anwer87 كتب :

(07-07-17, 12:10 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته

أهلا أخي الكريم , مرفق مثال بحث يوضح الطريقة , والفكرة أو الحل هو مثلا إذا أردت البحث عن كلمة بها حرف الألف أو حرف التاء المربوطه ولكي تتجاهل الهمره في الألف أو التاء المربوطه مثلا الكلمة تريد البحث عن جملة معينه فيها كلمة "أحمد" أو كلمة "عطية" فا في جملة الإستعلام لابد أن تكون كلمة "أحمد" بهذا الشكل "[أاإآ]حمد" وكلمة عطية بهذا الشكل "عطي[ةه]" لكي يتم البحث عن الكلمة التي تطابق جميع الإحتمالات التي بين الأقواس ال

شكرا على الرد بس ما اشتغل 
ممكن انت تشوف الخلل بدون زحمة 
المرفقات

---

(01-08-17, 12:17 PM)ali.anwer87 كتب :

(08-07-17, 03:18 PM)ali.anwer87 كتب :

(07-07-17, 12:10 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته

أهلا أخي الكريم , مرفق مثال بحث يوضح الطريقة , والفكرة أو الحل هو مثلا إذا أردت البحث عن كلمة بها حرف الألف أو حرف التاء المربوطه ولكي تتجاهل الهمره في الألف أو التاء المربوطه مثلا الكلمة تريد البحث عن جملة معينه فيها كلمة "أحمد" أو كلمة "عطية" فا في جملة الإستعلام لابد أن تكون كلمة "أحمد" بهذا الشكل "[أاإآ]حمد" وكلمة عطية بهذا الشكل "عطي[ةه]" لكي يتم البحث عن الكلمة التي تطابق جميع الإحتمالات التي بين الأقواس ال

شكرا على الرد بس ما اشتغل 
ممكن انت تشوف الخلل بدون زحمة 
ال

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

[اسلام الكبابى]

أستاذنا الكبيييييييييييير
وكيف يمكن البحث البحث مع تجاهل هذه الهمزات بحيث لو وضعت أى جزء من بداية اسم الشخص يظهر لى السجل
ففى مثالك المرفق
أريد لو كتبت"أحمد محمد" تظهر لى نفس السجلات الأربعة التى تظهر ان كتبت"أحمد محمد عطيه"
ولكن طبعآ لو كتبت"محمد عطيه" لا يظهر منهم أى سجل
ولكم ألف شكر

[اسلام الكبابى]

أنا أعرف أن جملة البحث التى أطلبها(لو بدون تجاهل هذه الهمزات) ستكون هكذا

"zSQL = "Select * From Table1 Where instr(Name, " & Trim$(Text1.Text) & ") = 1

ولكن المشكلة أنه مع تجاهل هذه الهمزات لم يصلح هذا الكود

فكيف يمكن ذلك ؟
ولكم ألف شكر

[Ahmed_Mansoor]

أهلا بك أخي الكريم , إذا أردت البحث مع تجاهل هذه الهمزات بحيث لو وضعت أى جزء من بداية اسم الشخص إستخدم علامة أو رمز النسبة المئوية قبل علامة التنصيص المفرد التي تكون في آخر نص الإسم المراد البحث عنه و إذا أردت البحث بأى جزء إستخدم علامة النسبة المئوية بعد علامة التنصيص المفرد التي تكون في أول نص الإسم المراد البحث عنه وقبل علامة التنصيص المفرد التي تكون في آخر نص الإسم المراد البحث عنه :

PHP كود :

zSQL = "Select * From Table1 Where Name LIKE '" & Fix_SearchText(Trim$(Text1.Text)) & "%'" 


أو

PHP كود :

zSQL = "Select * From Table1 Where Name LIKE '%" & Fix_SearchText(Trim$(Text1.Text)) & "%'" 


بالتوفيق .

[اسلام الكبابى]

[b]أستاذنا الكبيييييييييييير[/b]
ولكن هذه الأكواد تبحث عن أى جزء فى اسم الشخص
وليس عن أى جزء من بدايته
ففى مثالك المرفق
لو كتبت"محمد عطيه" يظهر السجل "أحمد محمد عطيه" وباقى السجلات المحتوية على"محمد عطيه"

إقتباس : أريد لو كتبت"أحمد محمد" تظهر لى نفس السجلات الأربعة التى تظهر ان كتبت"أحمد محمد عطيه"
ولكن طبعآ لو كتبت"محمد عطيه" لا يظهر منهم أى سجل

ولكم ألف شكر