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

نسخة كاملة : مشكلة الاحرف
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2 3
(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 

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

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

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

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

تم تطبيقه على المثال السابق   مع زيادة حرفين "ي ى"
(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
شكرا على الرد بس هم ماضبطت 

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

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

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

ما اشتغل جربته
(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
ولكن المشكلة أنه مع تجاهل هذه الهمزات لم يصلح هذا الكود

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



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

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]
ولكن هذه الأكواد تبحث عن أى جزء فى اسم الشخص
وليس عن أى جزء من بدايته
ففى مثالك المرفق
لو كتبت"محمد عطيه" يظهر السجل "أحمد محمد عطيه" وباقى السجلات المحتوية على"محمد عطيه"
إقتباس : أريد لو كتبت"أحمد محمد" تظهر لى نفس السجلات الأربعة التى تظهر ان كتبت"أحمد محمد عطيه"
ولكن طبعآ لو كتبت"محمد عطيه" لا يظهر منهم أى سجل

ولكم ألف شكر
الصفحات : 1 2 3