البحث عن كلمه او نص داخل جدول اكسيس

[محمد مسافر]

السلام عليكم احبتي

يوجد لدى ملف اكسيس واريد اخفي البيانات الموجوده في جدول الاكسيس بحيث لاتكون ظاهره واعمل فقط خانه بحث بكلمه او نص موجود في العمود الثالث المسمى Book Area مثلاً بحثت عن كلمه الجامعة في العمود الثالث المسمى Book Area تظهر لي نتيجه الصف كامل في المعرف 8 وان تكررت كلمه الجامعه في سجل اخر ايضأً تظهر النتيجه .

 

اتمنى منكم المشاركه منكم في عمل الفكره المطلوبه وموضح لكم الملف وشروحات تقريبيه بالصوره للفكره .

شكراً .

Book Info.accdb

[ابو البشر]

جرب المرفق ......

 

Book Info.accdb

[محمد مسافر]

شكراً جزيلاً ياابو البشر وممنون لك

فقط لطفاً منك الفكره التي عملتها انت هي  التي اريدها ولكن ينقصها اهم حاجه وهي اخفاء بيانات الجدول على الجميع اريدها محجوبه لااحد يطلع عليها فقط يبحث عن الكلمه او النص وتظهر النتيجه كما عملت انت صحيح ، فقط  انا المستخدم الذي تظهر لي البيانات للجدول و استطيع التعديل والمسح والااضافه بمعنى عندي الصلاحيه وللشرح اكثر الصور ارفقها لك .

تم تعديل أكتوبر 19, 2022 بواسطه محمد مسافر

[ابو البشر]

طبعا وفبل كل شيئ هناك طرق اكثر احترافية في المنتدى للقيام بحماية قاعدة البيانات ولكن انظر لهذة الطريقة البسيطة ربما تفي بالقرض ....

 

Book Info.accdb

[محمد مسافر]

ياسلام عليك ياابو البشر بالضبط هذا مااريد ولكن كيف اكون لدي الصلاحيات انا فقط او من اسمح لهم للاطلاع اما بكلمه سر او خيار معين ربما زر الشفت اثناء تشغيل الملف والتعديل على الجدول والتعديل والمسح والاضافه لبيانات جديده انا عندي خبره في الفيجوال دوت نت وممكن اساعدك في حاجها تحتاجها في الفيجوال لكن الاكسيس والله للاسف انا ضعيف جداً وليس لى فيه .

اخي العزيز ابو بشير تذكرت الطريقه بالضغط على SHIFT اثناء تشغيل الملف الاكسيس ودخلت عليه ولم اعلم كيف يتم التحرير وظهور البيانات .

 

اسف على ازعاجك .

[ابو البشر]

3 ساعات مضت, محمد مسافر said:

ياسلام عليك ياابو البشر بالضبط هذا مااريد ولكن كيف اكون لدي الصلاحيات انا فقط او من اسمح لهم للاطلاع اما بكلمه سر او خيار معين ربما زر الشفت اثناء تشغيل الملف والتعديل على الجدول والتعديل والمسح والاضافه لبيانات جديده انا عندي خبره في الفيجوال دوت نت وممكن اساعدك في حاجها تحتاجها في الفيجوال لكن الاكسيس والله للاسف انا ضعيف جداً وليس لى فيه .

اخي العزيز ابو بشير تذكرت الطريقه بالضغط على SHIFT اثناء تشغيل الملف الاكسيس ودخلت عليه ولم اعلم كيف يتم التحرير وظهور البيانات .

 

اسف على ازعاجك .

طيب شوف كده ............

Book Info.accdb

[ابو البشر]

الرقم 123

[محمد مسافر]

سلم ياغالي

عملت مسئول وادخلت كلمه المرور 123 ولايوجد اي ظهور للبيانات التي ممكن اعدل ربما هناك اشكاليه لو الخيار مفعل ويسمح اعدل على البيانات كان حاجه حلوه وتمام معلش ممكن تشوف الاشكاليه وتحلها شكراً لتعاونك .

[ابو البشر]

18 ساعات مضت, محمد مسافر said:

سلم ياغالي

عملت مسئول وادخلت كلمه المرور 123 ولايوجد اي ظهور للبيانات التي ممكن اعدل ربما هناك اشكاليه لو الخيار مفعل ويسمح اعدل على البيانات كان حاجه حلوه وتمام معلش ممكن تشوف الاشكاليه وتحلها شكراً لتعاونك .

طيب ادخل الرقم السري .... وجرب ...

 

Book Info.accdb

[محمد مسافر]

7 ساعات مضت, ابو البشر said:

طيب ادخل الرقم السري .... وجرب ...

 

Book Info.accdb 488 kB · 3 downloads

اسعد صباحك ابو البشر والخير  هذا النموذح لا يناسب ومشكور على الجهد الذي عملته .

[محمد مسافر]

في 19‏/10‏/2022 at 17:41, ابو البشر said:

طبعا وفبل كل شيئ هناك طرق اكثر احترافية في المنتدى للقيام بحماية قاعدة البيانات ولكن انظر لهذة الطريقة البسيطة ربما تفي بالقرض ....

 

Book Info.accdb 460 kB · 9 downloads

حقيقه هذا النموذج المقنع وهو المناسب والاقرب والذي سااعمل عليه والذي اشكرك عليه لااني اتعبتك بصراحه حتى قدرت اوصل الفكره و مشكور على الجهد الذي قمت ، طلبي الاخير لدي الملف المرفق اريد تطبيقه نفس الفكره بالضبط  للملف الموضح تماماً دون اي تغيير الجديد في الملف هو فقط اسماء الحقول مختلفه واسم الجدول مختلف اما الفكره فهي نفس الفكره اريد عمله بالضبط نسخه نفس الفكره ونفس العمل 100% اكون شاكراً جداً واسف على ازعاجك هذا هو طلبي الاخير واتشرف بك صديقاً في هذ الصرح الكبير .

On air 4G info sites.accdb

[محمد مسافر]

خلاص ابو البشر عدلت عليها غيرت اسماء الحقول وغيرت عليها في اكواد الفيجوال برمجياُ والامور تمام .

 

وانا اتقدم اليك بجزيل الشكر والعرفان وممنوم لك كثير اخي بارك الله فيك .

في 19‏/10‏/2022 at 17:41, ابو البشر said:

طبعا وفبل كل شيئ هناك طرق اكثر احترافية في المنتدى للقيام بحماية قاعدة البيانات ولكن انظر لهذة الطريقة البسيطة ربما تفي بالقرض ....

 

Book Info.accdb 460 kB · 14 downloads

مشكورررررررررررررررررر 

[محمد مسافر]

18 ساعات مضت, محمد مسافر said:

حقيقه هذا النموذج المقنع وهو المناسب والاقرب والذي سااعمل عليه والذي اشكرك عليه لااني اتعبتك بصراحه حتى قدرت اوصل الفكره و مشكور على الجهد الذي قمت ، طلبي الاخير لدي الملف المرفق اريد تطبيقه نفس الفكره بالضبط  للملف الموضح تماماً دون اي تغيير الجديد في الملف هو فقط اسماء الحقول مختلفه واسم الجدول مختلف اما الفكره فهي نفس الفكره اريد عمله بالضبط نسخه نفس الفكره ونفس العمل 100% اكون شاكراً جداً واسف على ازعاجك هذا هو طلبي الاخير واتشرف بك صديقاً في هذ الصرح الكبير .

On air 4G info sites.accdb 640 kB · 7 downloads

 

في 19‏/10‏/2022 at 17:41, ابو البشر said:

طبعا وفبل كل شيئ هناك طرق اكثر احترافية في المنتدى للقيام بحماية قاعدة البيانات ولكن انظر لهذة الطريقة البسيطة ربما تفي بالقرض ....

 

Book Info.accdb 460 kB · 14 downloads

الملف جاهز وانا اشكرك والله اثناء عملي على الملف خطرت فكره  ايضاً البحث  بحسب الحقل المسمى GOV  حاولت مثل ماهو موضح لك في الصوره و الذي انا عملته بس مانفع البحث ممكن الافاده ليكتمل العمل 100%

ملاحظه : لاحظت ان هناك عند البحث عندما يتم الضغط فقط على رمز * فقط تظهر البيانات كامله وهذا ايضاً موجود في الاكسل فهل هذه ثغره في النظام ام انها طبيعي ممكن تعالج .

تحياتي لكم ياكرام ومنتظر توضيحك استاذي ابو البشر واكرر شكري لك ولبقيه اعضاء المنتدى الكرام .

On info .rar

[ابو البشر]

اهلا بك اخي الكريم ::::

هي ليست ثغرة بقدر ما انت تقول للبرنامج اعرض الكل هذا هو معني *

اما بالنسبة لطلبك جرب استبدال الكود يالتالي .....

If IsNull(Me.searchtext) Then
MsgBox "لم تقم بكتابة عبارة البحث": Exit Sub
End If
a1.Visible = True
a2.Visible = True
a3.Visible = True
a4.Visible = True
sq1 = " SELECT [On air 4G info sites].المعرف, [On air 4G info sites].GOV, [On air 4G info sites].Region, [On air 4G info sites].[Coverage Area]  FROM [On air 4G info sites]  WHERE ((([On air 4G info sites].[GOV]) Like ""*"" & [forms]![form1]![searchtext] & ""*""));"

Me.RecordSource = sq1

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

[محمد مسافر]

اسعد مساك ابو البشر   سعدت بردك والله الموضوع بالنسبه لي مهم واريد ابداء فيه 

وشكراً على الاهتمام فقط اود التوضيح الملف الان يبحث بالحقل المسمى Coverage Area طلبي هو ايضاً البحث بالحقل المسمى GOV  بحيث يكون البحث بالحقلين مع بعض بحيث كتبت كلمه موجوده في احد الحقلين Coverage Area او  GOV يظهر لي البحث كامل قد جربت الكود الذي مصور لشخصكم الكريم سابقاً بس ما اشتغلهذا هو الذي اطلبه اريد يبحت من الحقلين وليس حقل واحد ارجوء الافاده واسف على ازعاحك وانت اكثر شخص تعاوناً .

 

فكره الملف  ستضاف اليه معلومات بشكل اسبوع من ملف اكسل تقريباً 400 سجل بنفس تسلسل البيانات وسيتم نسخها الى الاكسس مباشره وصعب الكتابه يدوياً  وستكون لي الصلاحيه من خلال الضغط على SHIFT اثناء التشغيل لفتح الجدول والااضافه .

اريد الملف يتمتع بخصوصيه لااحد يستطيع يطلع بيانات الجدول فقط من خلال استخدام الفورم ومن قائمه البحث يدخل الكلمه او النص المشابه وهو يظهرها .

 

من الاشكاليات التي ستحصل معي وسناخذها في الحسبان مستقبلاً حتى نجد حلول مناسبه كالاتي :

1- ممكن حد فاهم في الاكسيس ممكن بطريقه الضغط على الزر شفت اثناء نشغيل الملف يستطيع الوصول الى البيانات والاطلاع عليها ( ابحث عن حل لهذا الموضوع بحيث تكون الصلاحيه لي فقط بطريقه ماء استطيع الوصول الى الجدول .

2- الرمز * اثناء ادخاله في قائمه البحث يظهر لي كل المعلومات (ابحث عن حل لحجب هذا الامر )

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

 

[محمد مسافر]

ان كان هناك امكانيه لانه الفكره اتت من بعد مالم عادي ان مقدر وشاكر لجهودك استاذي .

 

شكراً

[ابو البشر]

ههههه بهذه الاسئلة .... تجاوزنا ضوابط المنتدى ... لان المنتدى خصص لكل موضوع سؤال واحد فقط ... طبعا ليس لشيئ وانما لتنضيم عملية البحث عن المعلومة مستقبلا لمن يزور المنتدى .... 

طيب ... جاري العمل على النقطه الاولى وهي محور الموضوع ... البحث في حقلين .. انتظرني..

والمطلب الثاني حاول فرد موضوع له بعد ذلك حتى لا نتجاوز حدود الضبط في المنتدى واحاول ويحاول رواد المنتدى بحلول لك ... بارك الله فيك

[ابو البشر]

16 ساعات مضت, محمد مسافر said:

اسعد مساك ابو البشر   سعدت بردك والله الموضوع بالنسبه لي مهم واريد ابداء فيه 

وشكراً على الاهتمام فقط اود التوضيح الملف الان يبحث بالحقل المسمى Coverage Area طلبي هو ايضاً البحث بالحقل المسمى GOV  بحيث يكون البحث بالحقلين مع بعض بحيث كتبت كلمه موجوده في احد الحقلين Coverage Area او  GOV يظهر لي البحث كامل قد جربت الكود الذي مصور لشخصكم الكريم سابقاً بس ما اشتغلهذا هو الذي اطلبه اريد يبحت من الحقلين وليس حقل واحد ارجوء الافاده واسف على ازعاحك وانت اكثر شخص تعاوناً .

 

فكره الملف  ستضاف اليه معلومات بشكل اسبوع من ملف اكسل تقريباً 400 سجل بنفس تسلسل البيانات وسيتم نسخها الى الاكسس مباشره وصعب الكتابه يدوياً  وستكون لي الصلاحيه من خلال الضغط على SHIFT اثناء التشغيل لفتح الجدول والااضافه .

اريد الملف يتمتع بخصوصيه لااحد يستطيع يطلع بيانات الجدول فقط من خلال استخدام الفورم ومن قائمه البحث يدخل الكلمه او النص المشابه وهو يظهرها .

 

من الاشكاليات التي ستحصل معي وسناخذها في الحسبان مستقبلاً حتى نجد حلول مناسبه كالاتي :

1- ممكن حد فاهم في الاكسيس ممكن بطريقه الضغط على الزر شفت اثناء نشغيل الملف يستطيع الوصول الى البيانات والاطلاع عليها ( ابحث عن حل لهذا الموضوع بحيث تكون الصلاحيه لي فقط بطريقه ماء استطيع الوصول الى الجدول .

2- الرمز * اثناء ادخاله في قائمه البحث يظهر لي كل المعلومات (ابحث عن حل لحجب هذا الامر )

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

 

طيب اخي الكريم ..... تم حل مشكلتين لديك وهي :

- البحث في حقلين

- مشكل الرمز *

بقية مشكلة الحماية والاستيراد من ملف الاكسل ... ( افرد لها موضوعين مستقلين )  بارك الله فيك ....................

استخدم الكود التالي ::::::::

If IsNull(Me.searchtext) Or Me.searchtext = "*" Then
MsgBox "لم تقم بكتابة عبارة البحث": Exit Sub
End If
a1.Visible = True
a2.Visible = True
a3.Visible = True
a4.Visible = True
Me.RecordSource = " SELECT [On air 4G info sites].المعرف, [On air 4G info sites].GOV, [On air 4G info sites].Region, [On air 4G info sites].[Coverage Area], [Coverage Area] & "" "" & [GOV] AS D  FROM [On air 4G info sites]  WHERE ((([Coverage Area] & "" "" & [GOV]) Like ""*"" & [forms]![form1]![searchtext] & ""*""));"

 

[محمد مسافر]

6 ساعات مضت, ابو البشر said:

طيب اخي الكريم ..... تم حل مشكلتين لديك وهي :

- البحث في حقلين

- مشكل الرمز *

بقية مشكلة الحماية والاستيراد من ملف الاكسل ... ( افرد لها موضوعين مستقلين )  بارك الله فيك ....................

استخدم الكود التالي ::::::::

If IsNull(Me.searchtext) Or Me.searchtext = "*" Then
MsgBox "لم تقم بكتابة عبارة البحث": Exit Sub
End If
a1.Visible = True
a2.Visible = True
a3.Visible = True
a4.Visible = True
Me.RecordSource = " SELECT [On air 4G info sites].المعرف, [On air 4G info sites].GOV, [On air 4G info sites].Region, [On air 4G info sites].[Coverage Area], [Coverage Area] & "" "" & [GOV] AS D  FROM [On air 4G info sites]  WHERE ((([Coverage Area] & "" "" & [GOV]) Like ""*"" & [forms]![form1]![searchtext] & ""*""));"

 

 

شكراً جزيلاً استاذي الكريم الان تمام 100 % شكراً .

[ابو البشر]

13 ساعات مضت, محمد مسافر said:

 

شكراً جزيلاً استاذي الكريم الان تمام 100 % شكراً .

اذن ... تبقى بقية الطلبات 

اكتب موضوع جديد ... ونحاول الاجابة بما نستطيع ... بارك الله فيك

[محمد مسافر]

شكراً لكم جميعاً ماقصرتوا .

20 ساعات مضت, ابو البشر said:

اذن ... تبقى بقية الطلبات 

اكتب موضوع جديد ... ونحاول الاجابة بما نستطيع ... بارك الله فيك

ماقصرت والله اشكر تعاونكم سااعمل موضوع جديد واود التوضيح عند محاوله فتح البرنامج من مكان عملي ظهرت لي رساله لم يفتح البرنامج ساارفقها في موضوع جديد حتى تعم الفائده للجميع .