عليكم السلام
من المثال المرفق يتضح ان لديك موظفين وتريد ان ترصد لهم ما يتحصلون عليه من اجازات او دورية او يسجل ضدهم من غياب
فان كان الادخال كما في المصنف وهو عبارة عن عدد ( 1 او 2 او 3 او ...... ) فالعمل يسير جدا
وسأوجهك لطريقة احترافية تختصر عليك الجهد والوقت
فقط المطلوب منك ان تعمل على قاعدة بيانات mdb ان احببت لانه هو الاصدار الذي املك في حاسوبي
اهلا استاذ رمهان
يبدوا ان SetParameter موجودة ضمن docmd في الاصدارات الجديدة
الصورة تتكلم :
ما الحب الا للحبيب الأول .. لا تصلح في هذا العلم .. اما المواكبة واما التوقف
نفرض اضفنا عمود باسم text1 الى جدول الشهور ونريد ان نضع كلمة ok في الحقل امام شهر 7 الكود سيصبح هكذا
DoCmd.RunSQL "UPDATE tbl1 SET tbl1.text1 = ""ok"" WHERE tbl1.month_ID=7"
vba3.mdb
في الاستعلامات الاجرائية ( التحديث والالحاق والحذف والإنشاء) يمكن تمرير المعلمات داخل الكود وتنفيذ الاجراء
ولكن يمتنع عرض جملة select باستخدام OpenQuery
ايضا لا مكان للمعلمات داخل الجملة
بناء الجملة :
OpenQuery(QueryName, View, DataMode)
ولكن يمكن لتطبيق الفكرة التحايل واستخدام وسيط مؤقت
انظر المرفق
vba2.mdb
ضع في الاستعلام في المعيار بدلا من الجملة [ادخل رقم الشهر] ضع رقم 7
هذه اجابة حسب طلبك بالضبط
الحل الآخر :
عادة يتم اختيار الرقم من داخل النموذج قبل النقر على الزر
وهو ما صنعته لك في مثالك المرفق
vba.mdb
السلام عليكم
لتنفيذ ما تفكر به يجب ان يكون النموذج الفرعي غير منضم الى الجدول ويتم ربطه بجدول مؤقت
وعند الحفظ يتم الإلحاق
وعند التفريغ يتم الحذف من الجدول المؤقت
قد يبدر سؤال : الى يمكن الاستغناء عن الجدول المؤقت ؟ .. نعم يمكن الاستغناء عنه لو كان النموذج منفرد ولكن في الوضع الحالي النموذج فرعي ومرتبط بعلاقة مع النموذج الرئيس والعلاقة هذه هي حقيقة علاقة بين مصدري بيانات النموذجين
برنامج22.rar
على رأي اخونا جعفر
فأنا عدلت حسب طلبك واكملت على مثالي السابق لاني قريب العهد به
ولان التعديل عليه ايسر من العمل على المرفق الاخير
فقط اختر من النموذج وانقر الزر للعرض
Database112.rar
اخي محمد اعتقد لا يوجد معالج تشغيل باسم pdf.exe وانما برنامج اكروبات او شبيه له
بالنسبة لي فأنا افتح ملفات pdf بواسطة المتصفح Chrome.exe
في المرفقات تم التعديل على المثال وتمت التجربة وهو يعمل بامتياز .. فتح وغلق
فقط افتح الفورم وجرب
openAnyFile.rar
وجدت لك وحدة نمطية جميلة خاصة بغلق الملفات
وكل ما عليك عمله هو تغيير سطرين : 1-اسم الملف ومكانه 2- نوع معالج الملف
تم التطبيق داخل المثال على المفكرة
وللاستزادة تفضل من هنا
فتح وغلق اي ملف.rar
السلام عليكم
نيابة عن حبيبنا الاستاذ جعفر والذي نتمى له السلامة في سفره وإقامته وندعوا الله ان يحفظه من كل سوء ويلبسه اثواب العافية ..
هذا تعديل على ملفك وفيه يتم تصفية التقرير من خلال النموذج
Database111.rar
اخي الكريم
هكذا استمرار في مخالفة قواعد المشاركات ،،
الموضوع يستحق الاغلاق بامتياز ولكني سأبقي عليه مع حذف وتعديل ما يلزم
أمل التقيد بالقواعد الصحيحة وتوجيه السؤال للعموم
غير صحيح .. تعيين خصيصة لاحد الحقول : مطلوب =نعم فهي لا تمنع ظهور سجل الاضافة
راجع خصائص النموذج الفرعي / لسان التبويب : بيانات .. او ارفق عملك الاخير
الازعاج الذي سيواجهك فقط هو رسالة الاعتراض (الغير مفهومة) على ترك السجل خالي ، ويمكن علاجها بعمل حدث قبل التحديث واظهار رسالة انت تكتبها
السلام عليكم
ملزوم تجعل خصيصة احد الحقول في الجدول الفرعي : مطلوب =نعم
مثلا اسم الموظف
بكذا لا يمكن اضافة سجل او ظهوره وايضا لايمكن الحفظ الا بعد تعبئة الحقل
تفضل
افتح الاستعلام تجد مطلوبك
وحتى تضمن الدقة في الفرز يمكنك ان تجعل معرف الوظيفة ارقام طويلة مثلا بدلا من 1، 2 ، 3 تجعلها 111 ،222 ، 333 ... وهكذا
ترقيم تلقائي منوع.rar