منذر عساج

أخي الكريم إن كنت تريد ترقيم تلقائي في التقرير فإليك الطريقة : انشأ مربع نص جديد ضع في مصدر عنصر التحكم =1 وفي مجموع تراكمي اختر شامل ( للترقيم التقرير ككل ) أو مجموعة اضافية (للترقيم حسب مجموعات الفرز لديك )

أعتقد أن الإجراء RecordSource يحقق لك ما تريد والمثال المرفق يحقق تماماً ما تريد SearchEngineDemo.rar

هذا الشرح الذي كنت قد وعدتك به المؤلف : كريستوف وارين والمترجم: محمد علوي صوصي _____________DAO.rar

قمت بعمل بعض التعديلات 1- نموذج إدخال المدارس وعدد طلبيات كل مدرسة 2- نموذج مستقل لإدخال أسماء الطلبيات شاهد المرفق وإعلمني برأيك db1.rar

بالإمكان أخي الكريم قم بعمل جدول يحوي الحقول جدول 1: (رقم الطالب - اسم الطالب )رقم الطالب مفتاح أساسي جدول2: (رقم الطالب - رقم السؤال -السؤال -إجابة 1(نعم/لا)-إجابة 2(نعم/لا)-إجابة 3(نعم/لا)-إجابة 4(نعم/لا)) اربط بين الجدولين عن طريق رقم الطالب بعلاقة رأس بأطراف قم بعمل الإستعلامات التي تريدها للفرز والله الموفق ,,,

قم بعملية ضغط وإصلاح للمثال ثم قم بضغطه عن طريق winrar وحاول إعادة إرفاقه . ولمزيد من الفائدة شاهد الرابط التالي: http://www.officena.net/ib/index.php?showtopic=5049&hl

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

أخي الكريم إذا كنت تقصد أنه كلما قمت بتغير الصورة يسجل تاريخ ووقت التغيير فأعتقد أنك بحاجة الى جدول يحوي ( رقم الصورة - تاريخ التعديل - وقت التعديل) وكلما قمت بالضغط عل زر تعديل الصورة تضع كود يغير قيمة حقل التاريخ والوقت الى الحالي أرجو أن أكون فهمت ما تريده ,,, والله الموفق ,,,

أخي الكريم هذا مثال بسيط بإستخدام الدالتين Dmax و Dmin والله الموفق ,,, db1.rar

أخي الكريم لدي كتاب شرح لـ DAO قام بترجمته أحد الأخوة لا أتذكر من هو سأقوم بإرفاقه لك غداً إن شاء الله وسوف تستفيد منه كثيراً .

أخي الكريم في هذه الحالة أمامك خيارين : 1- أن تقوم بعمل استعلام تحديث يغير القيم المطلوبة الى (صفر) فقط ويبقى الجدول على ما هو عليه . 2-إذا أردت حذف الحقول نهائياً فينبغي فصل الحقول الخاصة ببيانات السيارة في جدول مستقل ثم استخدام استعلام حذف . والله أعلم ,,,

أخي الكريم المنتدى غير مخصص لتصميم البرامج الجاهزة للأعضاء ولكن للمساعدة البرمجة في المشاكل التي تواجههم فقط أبدأ بتصميم الجداول وستجد كل المساعدة إن شاء الله . في البداية أعتقد أنك بحاجة الى جدولين : 1- جدول المدارس ( رقم المدرسة -اسم المدرسة - ......).رقم المدرسة مفتاح أساسي 2-جدول الطلبات ( رقم المدرسة - رقم الطلب - السنة ....) 3-جدول انواع الطلبيات ( رقم الطلب -اسم الطلب) تربط الجدول 1 والجدول 2 برقم المدرسة تربط رقم الطلب في الجدول 2 بقائمة تحرير وسرد من جدول 3. والله الموفق ,,,

أخي الكريم إذا كنت تريد وضع نظام صلاحيات فلا غنا لك عن برنامج الأخ / مهند عبادي http://www.officena.net/ib/index.php?showtopic=12782&hl مميزاته : 1-يضع نظام صلاحيات كامل على البرنامج. 2-يتيح لك اضافة مستخدم وحذف مستخدم والتعديل على صلاحياتهم كما تريد 3-وضع كلمات سر لكل شخص . 4- السماح بالحذف أو الإضافة أو التعديل لكل واحد منهم. وغير ذلك من الميزات الجميلة . والله الموفق ,,,,

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

يمكن إضافته في جميع الحقول لإن جملة name ستتغير كل مرة

أخي الكريم : الفقرة الأولى : ضع الكود التالي في قاعدة التحقق من الصحة Is Not Null وفي خانة نص التحقق من الصحة ضع العبارة ( لا يمكن أن يكون هذا الحقل فارغ) - على سبيل المثال- الفقرة الثانية : يجب أن يكون لديك نظام صلاحيات جرب نظام الصلاحيات الخاص بالأخ /مهند عبادي http://www.officena.net/ib/index.php?showtopic=12782&hl الفقرة الثالثة: في حدث عند النقر لزر الأمر ضع الكود التالي : If IsNull(Name) Then MsgBox "يجب تعبئة حقل اللإسم أولاً" Else DoCmd.OpenForm "formname" End If name هو اسم الحق المراد اختباره والله الموفق ,,,

أخي الكريم إذا قمت بتتبع الكود في Function CalcAge Function CalcAge2 Function CalcAge3 ستجد ما يلي : 1- خاص بالتصريح بالمتغيرات (تعريف متغيرات) Dim vYears As Integer, vMonths As Integer, vDays As Integer 2- يحسب عدد الأشهر بين تاريخين vMonths = DateDiff("m", vdate2, vDate1) 3- يحسب عدد الأيام بين تاريخين vDays = DateDiff("d", DateAdd("m", vMonths, vdate2), vDate1) وهكذا .... ثم نقوم بإستدعاء هذه الإجراءات عن طريق حدث بعد التحديث للحقل (التاريخ الحالي): If IsNull(Me.P) Or IsNull(Me.dm) Then Exit Sub Me.w = "(" & CalcAge(Me.P, Me.dm) & ")" Me.e = "(" & CalcAge2(Me.P, Me.dm) & ")" Me.r = "(" & CalcAge3(Me.P, Me.dm) & ")" والله الموفق ,,,

إضافة الى ما ذكر خول إضافة المراجع يدوياً هذه بعض الطرق لإضافة المراجع برمجياً : http://www.officena.net/ib/index.php?showtopic=1885&hl http://www.officena.net/ib/index.php?showtopic=6669&hl

أخي الكريم من قواعد طرع الأسئلة وضع سؤال واحد في كل مشاركة ليسهل البحث فيما بعد 1- بخصوص الفقرة الأول أنت بحاجة الى نظام صلاحيات لتحديد الأشخاص المسموح لهم بالحذف والإضافة والتعديل وأفضل مثال لذلك هو برنامج الصلاحيات للاخ /مهند عبادي http://www.officena.net/ib/index.php?showtopic=12782&hl 2- قبل تنفيذ كود فتح النموذج 2 أضف الكود التالي لإغلاق النموذج 1 DoCmd.Close 3-شاهد الرابط التالي http://www.officena.net/ib/index.php?showtopic=687&hl 4 - قم بتحرير أيقونة عن طريق الرسام ثم قم بنسخها ولصقها في القائمة عن طريق (لصق صورة الزر) 5- غير واضح مع ملاحضة إن كان هناك أستفسارات جديدة يرجى وضعها في مشاركة مستقلة والله الموفق ,,,

في هذه الحالة أنت بحاجة الى وضع نظام صلاحيات على برنامجك لتحديد الأشخاص المصرح لهم بالحذف والإضافة والتعديل قم بالبحث في المنتدى عبر كلمة (صلاحيات ) وستجد الكثير حول هذا الموضوع وأ أن تستخدم نظام الصلاحيات الخاص بالإستاذ / مهند عبادي على الرابط التالي http://www.officena.net/ib/index.php?showtopic=12782&hl

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

هذا مثال مبسط لما ذكره أخي / بويوسف الراشد db1.rar

أخي الكريم لا أدري ما هو نوع التحديث الذي تريده إذا كنت تريد تحديث بيانات مجموعة من الحقول استخدم الكود : Me.Refresh في حدث عند النقر على زر أمر أو في اي حدث تريده .

أخي الكريم إليك مثال بسيط لما تريد مربع تحرير وسرد تختار منه الرقم المطلوب أو تكتبه يدوياً في نفس الخانة db1.rar

جزاك الله خير ما قمت بعمله هو الأصح بالتأكيد