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

هل السؤال مفهوم وليس له حل ؟

أم أنه غير مفهوم؟

السلام عليكم

هو انا احترت بصراحه لكن هقولك علي حاجه شبيهه زي ما عملتها في الصوره الي فوقهنستخدم داله الريبليس او الإستبدال

replace

Dim n As String
n = Replace(Text1.Text, "أ", "ا", 1)
Text2.Text = n

بحيث ان الريبليس هيكون شغله علي تسكيت 1 ثم مطلوب البحث عن الهمزه أ وبماذا سيبدلها ان وجدها سيبدلها ب ا ومن اين سيبدا البحث داخل التيكست 1 وهي من اول حرف في التيكست بوكس

طبعا تيكست 2 ده الامر المراد تنفيذه انا حجزت متغير n علشان ياخد القيمه الي هطلعها ريبليس في الاخر

نفذ انت بداله الامر بتاعك

طبعا لو شغال بالادو يبقي الحفظ هيكون كمثال يعني انا مش بقلل منك ولا شئ

rs!name=n

انا هحاول اشوف طريقه للهمزات كلها برده بس انا عمال احاول فيها

-----------------------------

والله هو العليم

بص هو بصراحه انا توهت فيها لكن انا عملتهالك بحيث تفادي جميع الهمزات

بس انا هحط ليك الكود وانت شوف هتطور فيه ايه او هتخليها ازاي تعمل تصفيه ليها

صوره

حجز متغير من 5 اماكن

كل مكان بهمزه معينه

ثم استخدام INSTR للبحث داخل كل مخزن في المتغير ان وجد احداهاما يبلغ المستخدم بانه هناك رموز او همزات

لو عايز تزود همزات زود عدد اماكن المتغير مع مراعاه اضافه كود بحث ضمنهم مع تغير رقم المكان الي في المتغير

Dim SD(5) As String
SD(1) = "أ"
SD(2) = "ئ"
SD(3) = "لأ"
SD(4) = "ؤ"
SD(5) = "إ"
If InStr(1, Text1.Text, SD(1)) Or InStr(1, Text1.Text, SD(2)) _
 Or InStr(1, Text1.Text, SD(3)) Or InStr(1, Text1.Text, SD(4)) _
 Or InStr(1, Text1.Text, SD(5)) Then
MsgBox "رموز"
End If

وهذا الي حاولت اعمله وانا اسف ان لن يكن طلبك فيهم

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

اذا كانت قاعدة البيانات اكسس فالامر صعب ان لم يكن مستحيلا بالطرق المباشرة .

لكن يمكن التحايل على الموضوع ( لكن لا اعرف ان كان يناسبك ام لا ) عن طريق وضع حقل اخر للاسم بحيث يكون مجرد من الهمزات وفيما بعد تقو م بالبحث فيه

فمثلا اذا كان عندك الحقل Name تضع حقل اخر Name2 وفي هذا الحقل تضع الاسم بدون همزات عن طريق استبدال الهمزات مثل ما ذكر الاخ في المشاركة السابقة , وعند البحث تبحث بعد تجريد الهمزات في لحقل name2 .

طبعا هذه الطريقة لا تناسب ان وجد حقول كثيرة.

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

/index.php?showtopic=111389

جزاكم الله خيرآ أجمعين

ولكم ألف شكر

اقتباس

لكن يمكن التحايل على الموضوع ( لكن لا اعرف ان كان يناسبك ام لا ) عن طريق وضع حقل اخر للاسم بحيث يكون مجرد من الهمزات وفيما بعد تقو م بالبحث فيه

فمثلا اذا كان عندك الحقل Name تضع حقل اخر Name2 وفي هذا الحقل تضع الاسم بدون همزات عن طريق استبدال الهمزات مثل ما ذكر الاخ في المشاركة السابقة , وعند البحث تبحث بعد تجريد الهمزات في لحقل name2 .

بصراحة يا أستاذTareqVB لم أستطع تطبيق هذا الشرح تطبيقآ عمليآ

هذا برنامج صغير مرفق ، رجاء تعديله حتى يتجاهل الهمزات أثناء البحث

سواء تعديل كود البرنامج أو تعديل قاعدة البيانات

ولكم ألف شكر

_______.rar

Letters.rar

جزاك الله خيرآ

ولك ألف ألف شكر

أكرر شكرى مرة أخرى

ولكن تلاحظ أثناء عمل الRUN أن البرنامج لايتجاهل أكثر من همزة واحدة

فمثلآ فى السجل"اسلام فتحى ابراهيم" تجد أنك اذا غيرت أكثر من حرف يرد عليك البرنامج

قائلآ( لا يوجد مهندس بهذا الاسم ) أما ان غيرت حرفآ واحدآ يعرض لك السجل المطلوب

رجاء تعديله حتى يتجاهل جميع الهمزات أثناء البحث

ولكم ألف شكر