نضال

اشكر تواصلك استاذي الفاضل ...

لقد عانيت مشكلة فيما يبدو في عمل ذلك ....

ارفق لك الملف ... اتمنى ان تتفقده وتخطرني اين اخطأت .....

وانا في الانتظار بارك الله فيك .............

_______.rar

شكرا اخي الكريم .... لقد وجدت الكود التالي ، وهو اسهلها على الاطلاق ... ولكن هلك ان تخبرني اين اكتب الكود ... !!1 في أي حدث بالضبط ... ؟ ولك جزيل شكري ....

Dim mm
mm = DCount("[اسم الحقل]", "[اسم الجدول]")
If mm > 10 Then
MsgBox (" هذا النسخة تجريبية لا يمكنها تعبئة أكثر من 10 سجلات ... راجع المبرمج  ")
Docmd.quit
End If

السلام عليكم يا اخوان ..

لي استفسار .... كيف اجعل البرنامج لا يقبل الفتح او التشغيل بعد 15 يوم من فتحه لاول مرة !!!

اتمنى ان تدلوني لفكرة لعمل ذلك ..... شاكر تواصلكم معنا .... بارك الله فيكم ........

هذه الطريقة لم تمر علي اخي الكريم

اتمنى من الاخوة افادتنا بذلك حتى تعم الفائدة ...

وهذا مثال .....

db1.rar

اخي العزيز إليك الحل :

نفترض ان لديك نموذجين باسم : ss و dd

في نموذج1 وضعت زر امر لفتح النموذج الثاني وتريد عند فتح النموذج الثاني أن يغلق النموذج الحالي :

فما عليك سوى ان تكتب الكود التالي في زر الامر قبل كود فتح النموذج ليكون الكودين هكذا :

docmd.close

docmd.openform ss

وكذلك النموذج الثاني dd

بارك الله فيك استاذنا مهند .... جوزيت خيرا ....

والشكر الجزيل لك اخي بويوسف ... فقد استخدمت الطريقتين

شكرا لكم

وضحت الرؤية اخي الكريم ..... بارك الله فيك ....

واذا وجدت حل بالنسبة لزر الترقيم سيكون افضل ....

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

جميل اخي بو يوسف .... والله رائع ..

بقيت ثلاث ملاحظات وتنتهي المشكلة بالنسبة لدي .... في انتظارك

بارك الل فيك اخي يوسف .........

لقد اطلعت على الملف واعطيك ملاحظاتي بعد التجربة :

1- زر الحذف يحذف آخر سجل وليس السجل الذي اختاره !!!

2- عند الحذف ... لا يعطيني البرنامج رسالة تاكيد بالحذف !!

3- عندما يبقى آخر سجل فإن البرنامج يعطيني رسالة تأكيد وبعدها تحذف جميع محتويات النموذج بما فيه الازرار فيبقى النموذج فارغا !!!

4- لماذا غير نوع البيانات في سجل الرقم للجدول من ترقيم تلقائي الى رقم!!

5- ارجو ان تشرح لي الكود الذي كتبته في حدث ( في الحالي ) للنموذج ..

6- لماذا لم تكتب كود في زر اعادة الترقيم التلقائي .... حتى يكون الامر سهلا على المستخدم ... أمن المعقول ان لا يوجد كود يوفر ذلك في عالم الاكواد للاكسس .....

7- ما معنى الكود الذي كتبته في زر اضافة !!

ارجو التوضيح بارك الله فيك .... فإني مستفيد منك كثيرا دائما وأبدا

السلام عليكم..............

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

ارجو الافادة ........ في المثال المرفق ....

db1.rar

اخي يوسف .... لي طلب بسيط .... ارجو افادتي فيه

اذا اردت مثلا أن احلل الاستبانة !! فما هي انسب طريقة لذلك ...

ساعطيك مثالا ...

مثلا ... قام يوسف بتحرير استبانة واحدة ثم تلاه احمد وخالد وناصر ومهند .......

في نهاية ذلك اريد ان اعرف مثلا كم عدد الاشخاص الذين اختاروا الخيار موافق للسؤال الاول ... وكم عدد الذين اختاروا الخيار غير موافق وكم عدد الذين اختارو الخيار محايد ....

وهكذا مع السؤال الثاني والثالث .... !!

اظن ان الطريقة بواسطة الاستعلامات ولكني اجهلها ..... فهل لك ان تكمل جميلك في هذا .......... بارك الله فيك

واضح جدا استاذي الفاضل .....

بارك الله فيك .............

نعم اخي الكريم ....

ولكن هل لك ان تخطرني الخطوات

يعني أولا صممت جدولا للاسئلة لوضع فيه الاسئلة المراد ادراجها في نموذج الاستبانة

ثم صممت نمذجا لهذا الجدول .............

بعدها صممت استعلامات ثلاثة !!!

هذا ما اريد معرفته بالضبط ....

كيفية تصميمها ... وعملها ....

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

بارك الله فيك اخي الكريم ... وزادك الله اجرا وتقوى .....

بالفعل هذا ما اريده بالضبط ......

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

وهل هناك طريقة اخرى لعمل ذلك غير هذه الطريقة وتحضرك ذهنيا

افدني بارك الله فيك ........

السلام عليكم ..........

اتمنى ان تساعوني في المثال المرفق ... وهو قائم على كيفية تصميم استبانة في الاكسس

يوجد في المرفقات الشرح الكامل ..

اتمنى ان تفيدوني .... فالموضوع عاجل ........

_______.rar

شكرا اخي العزيز ... بارك الله فيك ...

المثال بالفعل يفي بالغرض ....

شكرا اخي الكريم ...

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

وبعده نقوم بتحليل الاستبانات كلها ....

أي : كم شخص اختار الخيار موافق في السؤال او المعيار الاول

وكم شخص اختار الخيار غير موافق ..... وهكذا ...

هذا ما اريده ...... ارجو الافادة ...

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

وسأوضح لك :

اذا اراد احدهم ان يختار الخيار ( محايد ) أو الخيار ( غير موافق ) فلن يتسنى له ذلك بناءا على مثالك .... اليس صحيحا ؟؟

ما اريده هو ان تكون الاستبانة كما صممتها انا والشخص الذي يمليها يختار ما يريد من الخيارات ( موافق) او (محايد) او ( غير موافق) .... فكل شخص بوجهة نظره ...

ارجو ان تكون الفكرة قد وضحت ... واتمنى ان تراجع المرفقات لتتأكد من ذلك

ما فيه رد .....

الموضوع مهم جدا .......

للرفع ....

ارجو المساعدة ..............

شكرا اخي على مرورك ... جزاك الله خيرا

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

السلام عليكم ....

هل من احد يساعدني في كيفية تصميم استبانة في الاكسس ... !! حيث عملت البرنامج وهو يستند الى جدول يتكون من الحقول التالية :

1- اسم المعيار (نص) 2- موافق(نعم/لا) 3- محايد(نعم/لا) 4- غير موافق(نعم/لا)

وعند انشاء النموذج اخترت نوع النموذج (مجدول) وذلك حتى يتسنى لي ان اكتب ما شئت من المعايير في الاستبانة .....

الى هنا والامور طيبة ....

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

( يعني كل سجل جديد يمثل استبانة جديدة ..... )

حقيقة الامر لم استطع التوصل الى طريقة عمل زر الاضافة وطبعا لان نوع النموذج مجدول

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

وارفق لكم ملف للتوضيح .......

_______.rar

السلام عليكم ...

لي استفسار :

كيف لي ان اجعل البرنامج يغلق نهائيا بعد الساعة 7:20 صباح !!!

ما الكود الذي اكتبه وفي اي حدث !!

اتمنى مساعدتي ....

جوزيت خيرا اخي الكريم .... هذا هو المطلوب بالضبط

بارك الله فيك ....