Foksh

أخي @دروب مبرمج إضافة جميلة وذكية Public Function SetFilePath(SetFolder As Variant) SetFilePath = CurrentProject.Path & "\" & "SysFiles" & "\" & SetFolder & "\" End Function

اسمح لي بسؤال أخي الكريم ، هل تحتاج إضافة أكثر من صورة للموظف ؟ إذا لا تحتاج وكان هناك تعارض في الفكرة التي استخدمتها في النموذج فهناك عدة طرق اسهل لك في الوقت والجهد لإدراج صورة واحدة للموظف وتعطيك نفس النتيجة . ملاحظتي لتوفر الوقت والجهد لك ليس إلا

تفضل أخي الكريم ,, أذا كان هو المطلوب ، فكلمة شكر تكفي ولتجنب تكرار هكذا مشاكل ، تجنب اللغة العربية في المسميات قدر المستطاع برنامج الأرشفة الالكترونية.accdb

اسمح لي بسؤال خطر في ذهني ,, طالما لا تريد حفظ التغييرات في النموذج الرئيسي ، فلم لا تجعل خيار ممكن = لا و مقفل = نعم ؟ هكذا لن يبقى لك سوى النموذج الفرعي ( الصلاحيات ) هو الذي سيكون عليه التعديل والحفظ . مجرد ملاحظة

اقتراحك جميل اخي @دروب مبرمج

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

اخي الكريم ، من باب خبرتي المتواضعة اعتقد أن الإجابة هي ( تكتب في كل أمر أو حدث على حدة )

اخي الكريم اعتقد انك بحاجة الى كود يعمل على مقارنة بيانات السجلات في الجدول ........ الخ الطريقة البرمجية قد تزعجك ، إلا أني جربت طريقة التفافية لولبية تفضل ،، bbb.accdb

هل تقصد هكذا ؟ Security - EDIT.mdb

اخي الكريم ، جرب هذه المحاولة البسيطة baset.zip

تفضل اخي الكريم ، هذا مثال بسيط اطبع سجلات محدد.accdb

هذا بالنسبة للطلب الأول ، الثاني أمره سهل إن شاء الله , طبعاً على طريقتي عملت لك الفكرة ؛ وبالنهاية القرار لك وأتمنى أن تكون هناك فكرة أخرى ارفاق ملف لا يقبل الا صيغة Tif.accdb

هات مرفق اخي الكريم ، وابشر

Security - EDIT.mdb

اخي الكريم انا لم افعل شيئاً ، فقد نقلت الكود من أخونا @شايب الى مربع السرد فقط foksh.zip

أخي الكريم الجدول clndtail موجود ، ما لم افهمه أرجو توضيحه بشكل أوسع ،

تفضل أخي الكريم , أتمنى أن يكون طلبك ارفاق ملف لا يقبل الا صيغة Tif.accdb

قد يكون التحزيم عن طريق الآكسيس فكرة جميلة ، فهو بدايةً سيقوم بتحويل قاعدة البيانات من Accdb أو Accde الى Accdr ، ولكن انا لدي اوفيس 2016 مثلاً وسيضطر ملف التنصيب خاصتك بتحميل نسخة آكسيس 2010 ( Runtime ) على جهازي ، وهذه الفكرة قد لا يرغب بها معظم المستخدمين لمشروعك . على العموم سأقوم بتحميله لأجلك وسأعطيك النتيجة 😊

اخي الكريم توني وصلت البيت من ساعة ، بتعشى وأجهز أرجيلتي وإن شاء الله اقدر افيدك ، ابشر

اقرأ هذه الفكرة ، قد تعجبك حركة التمويه 😅 مقالي

هل تقصد كهذه الفكرة بعد الكتابة في القائمة المنسدلة ؛ اضغط Enter Database1(1).zip

جرب واخبرني بالنتيجة db1.accdb

اخي الكريم ممكن تشرح لي ما الهدف من الزر بأن يجعل النموذج الفرعي سجل جديد ؟ وهل تقصد سجل جديد الإنتقال للسطر التالي لإدخال مادة جديدة في الفاتورة ؟؟!!؟؟

هههههه ، تخفي عني ما تعلم وانا الذي لا يعلم ، نقطة محسوبة لك 1 - 0