انشاء بحث مع تحديد الخيارات

السلام عليكم 

ارفع القاعدة حتى نحاول مساعدتك قدر المستطاع 

بسم الله والصلاة والسلام على رسول الله 

سيكون تقرير Report يسبقه استعلام Query ( يستند لاستعلام ) إن شاء الله 

استعلام ذو وسائط Parameter query : يطالب بمعلومات عند فتحه

تكتب السؤال بين قوسين [ ادخل تاريخ الميلاد ...] أمام منطقة الشروط Criteria  ، و أسفل حقل تاريخ الميلاد 

- إدراج تاريخ : يكون ال Report فى وضع التصميم Design View

أ- فى نسخة 2003 Office Access : من قائمة Insert ثم Date and Time

ب- أما نسخة 2010 : من تبويب Design ، المجموعة Header/Footer  ثم Date and Time

(والتقرير يتم عمله فى كل مرة ستتم طباعته )

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

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

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

عندي مجموعة من النماذج و الجداول (لعمل تقارير)

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

وايضاً, يوجد نموذج للمشاريع كيف يمكن النقل تلقائي في حسب التتابع التالي 

 نموذج الاول :تقديم العرض و الدراسة و في حال توقيع العقد ينقل الى جدول اخر باسم المشاريع الموقعة و في حال انتهاء المشروع ينقل الى جدول ثالث باسم المشاريع المنتهية 

رجوا المساعدة ان امكن للضرورة 

لااستطيع رفع القاعدة بسبب الحجم (هل يوجد حل للرفع )

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

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

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

عندي مجموعة من النماذج و الجداول (لعمل تقارير)

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

وايضاً, يوجد نموذج للمشاريع كيف يمكن النقل تلقائي في حسب التتابع التالي 

 نموذج الاول :تقديم العرض و الدراسة و في حال توقيع العقد ينقل الى جدول اخر باسم المشاريع الموقعة و في حال انتهاء المشروع ينقل الى جدول ثالث باسم المشاريع المنتهية 

رجوا المساعدة ان امكن للضرورة 

لااستطيع رفع القاعدة بسبب الحجم (هل يوجد حل للرفع )

-- تم ارفاق الرابط

http://www.mediafire.com/?sharekey=trash

بسم الله والصلاة والسلام على رسول الله 

الشكرلله . الحقيقة الرابط لا يفتح معى لكن ممكن تضغط الملف عن طريق برنامج WinRaR

حضرتك ممكن تعمل نموذج Form ، وتسميه الشاشة الافتتاحية  ، سوف تقوم بعمله من تبويب إنشاء ثم Form Design ، وتدرج عليه زرين Button 2   أو 3

- زر تسميه -- بحث عن طريق اسم القسم -- يُدخل المستخدم على استعلام ذو وسائط (يقول للمستخدم ادخل اسم القسم ) عندما يكتب المستخدم اسم القسم ويضغط موافق تظهر له النتائج  والتى من الممكن ان تكون مجمعة من أكثر من جدول وتكون العلاقات relations بين تلك الجداول سليمة .

ونفس الطريقة مع زر -- بحث عن طريق الرقم التسلسلى -- 

و زر تسميه -- مشاريع -- يُدخل المستخدم على نموذج مشاريع عند الضغط عليه . وفى كل نمودج منهم (المشاريع) نضع زر يذهب بالمستخدم للنموذج الذى بعده 

كيفية إدراج زر على ال Form وكتابة أمر له : 

- إنذهب للنموذج فى وضع التصميم Design View  

- ندرج الزر ثم نقوم بتحريره من Click يمين  ثم layout  ثم remove layout 

- نحدد الزر ثم من الخصائص Data sheet :  أمام عند النقر on click   

نضغط على السهم الأسود الصغير ونختار Event Procedurer ثم Click يمين ثم Build تفتح نافذة كتابة الكود 

كتابة أمر فتح الاستعلام  :    طريقة العرض ,  "اسم الاستعلام " Docmd.OpenQuery  

كتابة أمر فتح النموذج  :    طريقة العرض ,  "اسم النموذج" Docmd.OpenForm

مثال :
                     ()Private Sub Employees_Click
 acNormal , "بيانات الموظفين" Docmd.OpenForm 
                                                          End Sub

كود الزر إغلاق إذا أردته   DoCmd.Quit

إيثار كتب:

بسم الله والصلاة والسلام على رسول الله 

الشكرلله . الحقيقة الرابط لا يفتح معى لكن ممكن تضغط الملف عن طريق برنامج WinRaR

حضرتك ممكن تعمل نموذج Form ، وتسميه الشاشة الافتتاحية  ، سوف تقوم بعمله من تبويب إنشاء ثم Form Design ، وتدرج عليه زرين Button 2   أو 3

- زر تسميه -- بحث عن طريق اسم القسم -- يُدخل المستخدم على استعلام ذو وسائط (يقول للمستخدم ادخل اسم القسم ) عندما يكتب المستخدم اسم القسم ويضغط موافق تظهر له النتائج  والتى من الممكن ان تكون مجمعة من أكثر من جدول وتكون العلاقات relations بين تلك الجداول سليمة .

ونفس الطريقة مع زر -- بحث عن طريق الرقم التسلسلى -- 

 

و زر تسميه -- مشاريع -- يُدخل المستخدم على نموذج مشاريع عند الضغط عليه . وفى كل نمودج منهم (المشاريع) نضع زر يذهب بالمستخدم للنموذج الذى بعده 

كيفية إدراج زر على ال Form وكتابة أمر له : 

- إنذهب للنموذج فى وضع التصميم Design View  

- ندرج الزر ثم نقوم بتحريره من Click يمين  ثم layout  ثم remove layout 

- نحدد الزر ثم من الخصائص Data sheet :  أمام عند النقر on click   

نضغط على السهم الأسود الصغير ونختار Event Procedurer ثم Click يمين ثم Build تفتح نافذة كتابة الكود 

كتابة أمر فتح الاستعلام  :    طريقة العرض ,  "اسم الاستعلام " Docmd.OpenQuery  

كتابة أمر فتح النموذج  :    طريقة العرض ,  "اسم النموذج" Docmd.OpenForm

مثال :
                     ()Private Sub Employees_Click
 acNormal , "بيانات الموظفين" Docmd.OpenForm 
                                                          End Sub

 

كود الزر إغلاق إذا أردته   DoCmd.Quit

 

 

اخت ايثار 

شكرا جزيلا الله يكرمك 

ارجوا الاطلاع على البرنامج على الصفحة التالية 

تم ضغط البرنامج كاملا و الرجاء المساعدة ان امكن