أغيد

كم انتم رائعون اساتذتي الكرام ....حقيقة تعجز لساني عن شكركم @Barna @Moosak شكراً لكم جميعاً على وقتكم الثمين الذي بذلتموه من اجل مساعدتي اسئل الله ان يجزيكم عني خير الجزاء بالدنيا والاخرة ما كنت لاصل الى هذا الحلول الإبداعية لولا جهودكم وتفانيكم في مساعدة امثالي .. نفعنا الله بعلمكم وزادكم من بحرة جوده وكرمه واعطاكم كل ما تتمنوه وترجوه .. خالص دعائي لشخصكم الكريم هذا المرفق الاخير .. تم اضافة تعديلات اساتذتي الكرام الاخيرة ... test (19).accdb

استاذي الكريم بارنا .. تعجز كلماتي عن الشكر ... شكرا جزيلا لك اسئل الله ان يجزيك عني خيرا وان يعطيك ما تتمناه ...

استاذي العزيز أبو احمد ... شكرا لمحاولتك الكريمة في مساعدتي ... لكن المشكلة مازالت قائمة كما اوضحت... قم باضافة (سجل جديد)بالنموذج الرئيسي ثم بالنقر على زر (بيانات الفروع) هنا يتم اضافة سجل 1 فقط وتظهر الرسالة السابقة طبعا هذا بعد اضافة الكود السابقة من قبل اساتذتي الكرام @Barna , @Moosak حيث المطلوب هو فتح النموذج الفرعي من النموذج الرئيسي بحيث يتم ربط سجلات الفرعي بالرئيسي بحسب id_customer مما يسمح لي باضافة اكثر من سجل بالنموذج الفرعي لنفس customer >> مشكلة الربط تظهر فقط قد فتح النموذج الفرعي بشكل مستقل عن الفورم الرئيسي لكن عندما يتم تضمين النموذج الفرعي بالفورم الرئيسي الامور طيبة وكما هو موضح في الصورة

استاذي الكريم @Barna استاذي الكريم @Moosak شكرا جزيلاً لمروركم الكريم ولتعاونكم معي في حل المشكلة ... عند تطبيق ما تفضلتم به ومحاولة اضافة ( سجل جديد ) ظهرت لي رسالة تفيد لايمكنك اضافة سجل كما هو مبين في الصورة ادناه مرفق القاعدة بعد التعديل test (1).accdb

السلام عليكم رحمة الله . اساتذتي الاعزاء .. ارجوا مساعدتكم الكريمة فقد واجهتني مشكلة في ربط النموذج الفرعي بالنموذج الرئيسي من خلال زر امر حيث يلاحظ انه بعد اضافة زر فتح النموذج الفرعي لايتم ربطه بالنموذج الرئيسي ولست اعلم هل السبب في العلاقة ام في المايكرو المستخدم ... هذه المشكلة لاتظهر حيث يكون النموذج الفرعي مضمن بالنموذج الرئيسي لكن حين فتحه بشكل مستقل لايتم الربط بينهم test.accdb

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

نعم اخي الكريم يمكن عمل ذلك وسوف ارفق لك مثال عسى ان يكون طلبك.. قمت بتعبئة الحقول واختر المجموعة كي ينضاف مجلد الصور وعند اكتمال عدد 8 اسماء ستجد مبتغاك في التقرير كما طلبت ان شاء الله AttachFilesToDB.rar

مهما قلت لك شكرا لان افيك حقك ....ولا املك سوى ان ادعوى الله لك ان يزيدك علماً وينفعنا بعلمك وان يعطيك ما تتمناه وترجوه وان يجزيك عنا خير الجزاء في الدنيا والاخرة .. شكرا جزيلا من القلب

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

أستاذي ومعلمي العزيز @jjafferr سويت كما اوضحت لكن مازلت تظهر الرسالة السابقة بعدم وجود الملف رغم اني طبقت على اصدار اوفيس 2010 و 2019 و 2013 ومازالت كما هو في الصورة وكذا على نظامين مختلفين ويندوز 7 ويندوز 10 ولست اعلم هل المشكلة من الاوفيس او النظام او من الكود أرجوا ان لا اكون اثقلت عليك فكما هو واضح ان التطبيق يعمل عندك .....لكن لا اعلم سبب ظهور المشكلة عندي test.accdb

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

تظهر نفس الرسالة السابقة

اشتي افهم... لكن ماقدرت .. يبدوا لي الكلام عن تشفير البيانات

شكرا جزيلا ... استاذي العزيز أبو خليل .. وجزاك الله عني خيرا

تم تطبيق الكود السابق على المرفق كالأتي تم انشاء مودول واضافة الكود Public Sub EcryptDcryptImage(sFileSpec As String) Dim iFle As Long Dim iByteCount As Long Dim i As Long Dim ii As Byte iFle = FreeFile Open sFileSpec For Binary As iFle iByteCount = LOF(iFle) For i = 1 To iByteCount Get iFle, i, ii ii = ii Xor &HFF Put iFle, i, ii Next i Close iFle If UCase$(Right$(sFileSpec, 1)) = "." Then Name sFileSpec As Left$(sFileSpec, Len(sFileSpec) - 1) Else Name sFileSpec As sFileSpec & "." End If End Sub بعد ذلك تم وضع الكود التالي تحت زر امر ادراج مرفقات EcryptDcryptImage ([CurrentProject].[Path] & "\image1" & ".jpg") وتم ايضا اضافته في في حدث عند النقر على مسار الصورة (اسم المرفق) عند التطبيق لوحظ الأتي : عند ادراج صوره او عدة صور او مرفقات اخرى (وورد - اكسل - pdf- فيديو) تنضاف للبرنامج ويتم تشفيرها لكن تاخذ وقت من في الدوران من دقيقة الى 5 دقائق واكثر وكذلك تاخذ وقت عند فتح التشفير من خلال النقر على مسار المرفق واحياناً ويستمر بالدوران ولايتم التوقف الا اذا قمت بعمل (ctrl+break) ارجوا تفضلكم بالاطلاع على المرفق والمأخوذ من مشاركة للأخ العزيز @محمد سلامة والمعلم @jjafferr وقد استفدت منه في برنامجي وتبقىت هذه الجزئية عسى ان تجدوا حل لها اسئل الله ان ينفعنا بعلمكم ويجزيكم عنا خير الجزاء بالدنيا والاخرة test.accdb

تهانينا لكم @ابو البشر و @kkhalifa1960نسئل الله لكم التوفيق والنجاح ... تهنئة خالصة من طالب عالم ممتن لهذا المنتدى وللاساتذه الخبراء والقائمين على الموقع

تهانينا لك استاذ @Ahmed.IQاسئل الله لكم التوفيق والسداد وان يجزيكم خير الجزاء في الدنيا والاخرة ... تهنئة خالصة من طالب عالم ممتن لهذا المنتدى وللاساتذه الخبراء والقائمين على الموقع

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

تم الاجابة على جزء من سؤالك على هذا الرابط

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

ماشاء الله عليك نعم المعلم انت ... شكرا جزيلاً لك هذا المرفق لمن ارد الاستفادة منه EMPLOEES.accdb

شكرا لمرورك الكريم .. جاري تنفيذ ذلك وموافاتك بالنتيجة

السلام عليكم ورحمة الله ارجو ا التكرم بمساعدتي في كيفية التعديل على كود مربع التحرير والسرد والذي يقوم بجلب بيانات اسماء الموظفين الى النموذج حيث المطوب هو عند اختيار اسم الادارة يتم جلب البيانات واستبعاد الموظفين الذين هم موجودين في الجدول المقابل EMPLOEES.accdb