ابو عبد الرحمن اشرف

السلام عليكم ورحمة الله وبركاته اخواني واساتذتي الكرام عندي قاعدة بيانات مقسمه الي جداول ونماذج وعند الخروج من البرنامج يتم عمل نسخة احتياطية علي مجلد علي الدريف :c المشكلة هنا تكمن في ماذا لو تم عمل عطل للكمبيوتر ككل ولم نستطع الوصول الي قاعدة البيانات او النسخة الاحتياطية وعليه كان من الضروري عمل نسخةاحتياطية علي البريد الالكتروني بحيث نستطيع قتحها من اي مكان او من اي جهاز اخر وهذا هو المديول : Option Compare Database Option Explicit Public Function InitiateAutoBackup() As Boolean ' هذه الدالة خاصة بعملية التحقق من البدء في إجراء النسخ الاحتياطي ' ثم إنشاء النسخة الاحتياطية حسب المعطيات ' وهي الدالة التي يتم مناداتها في ماكرو AutoExec On Error GoTo HandleError Dim WhereToSave As String InitiateAutoBackup = False ' مكان الحفظ بجانب قاعدة البيانات 'WhereToSave = BECurrentPath & "Bakup\" WhereToSave = "c:\Bakup" ' التحقق من وجود نسخة سابقة أم لا .. وعمل النسخة في حال عدم وجودها If CheckBackupWeek() = False Then ' يفحص من جدول النسخ الاحتياطية إذا كانت هناك نسخة محفوظة سابقا خلال هذا الأسبوع ' إذا ما وجدها يحفظ وإذا وجدها ينتقل للإجراء التالي Call BackupToPath(WhereToSave) InitiateAutoBackup = True Else ' توجد نسخة سابقة لذلك يلغي العملية InitiateAutoBackup = False Exit Function End If HandleExit: Exit Function HandleError: If err.Number = 0 Then Exit Function Else MsgBox err.Number & vbNewLine & vbNewLine & err.Description, , "Code : InitiateAutoBackup()" End If Resume HandleExit End Function

لا حرمني الله منك اخي الحبيب الغالي تم الامر كما ينبغي

السلام عليكم ورحمة الله وبركاته اخواني واساتذتي الكرام ارجوا مساعدتي في جدول به حفل اسمه( المدة من) وحقل اخر اسمه (المدة الي) اريد وضع شرط في حقل (المدة الي ) بحيث لا يقبل تاريخ اقل من الموجود في (المدة من ) فمثلا مدة ايجار تبدأ من 1/06/2025 تنتهي في 01/12/2025 تم تدوينها بالخطأ 01/01/2025 والبرنامج قبل ذلك بدون تنبيه للمستخدم ان التاريخ خطأ

اجزل الله لك العطاء كفيت ووفيت بارك الله فيك اخي

1 - اسم قاعدة الجداول ‏‏‏‏برنامج العقارات 23 _be.accdb 2 - اسم الجدول tblCtrlDate اسم الحقل ctrlDate البرنامج موجود علي C:\ashraf .................................................................................................. حضرتك لو تريد تغيير اسم قاعدة البيانات مفيش مشكلة وانا اقوم بتغييرها عند العميل

حبيبي الغالي ابو جودي هل تلك الوحدة النمطية تعمل علي 64بت ام تحتاج تغيير في الصيغة

تبارك الله تسلم اخي وزادك الله علما ونفع الله بك تبقي كيفية عمل ذلك اعلم اني اثقل عليك فسامحني

بارك الله فيك اخي

الله يجزيك الخير تمام ولكن تبقي ان نخفي التاريخ عند كتابته فيظهر نجوم و عند استدعاء النموذج frm1 يكون بكلمة سر حتي لا يعبث به المستخدم وبارك الله فيك لخي الحبيب

اخي الحبيب الفاضل الذي اعرفه انه طالما نسخة الويندوز 32 بت فلابد يكون الاوفيس 32 وان عندي اللاب قديم فلا يقبل اوفيس 64 بت فهل هناك طريق لنسخة وهمية مثلا

السلام عليكم ورحمة الله وبركاته اساتذتي الاعزاء واعضاء منتدانا الكرام جهاز العميل اوفيس 64 وجهازي اوفيس 32 فأضطر عند عمل اي تعديل الي نسخ الملف المفتوح الي جهازه والاغلاق عنده مع العلم ان هناك واجهه(النماذج) وخلفي (الجداول) فما الحل ؟

@ابوخليل هل بالامكان عمل ذلك علي الملف المرفق وجزاك الله خيرا

وكيف يمكنني او يمكنك عمل دالة الربط آلية عند الاقلاع بملف توضيحي بارك الله فيك

@ابوخليل اخي الحبيب كلامك كله تمام ولكن تقابلني مشكلة ان جهاز العميل اوفيس 64 وجهازي اوفيس 32 فأضطر عند عمل اي تعديل الي نسخ الملف المفتوح الي جهازه والاغلاق عنده فما الحل ؟

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

بارك الله فيك اخي الحبيب الغالي فعلا ما كنت اتمناه بالضبط جعله الله في ميزان حسناتك وكل من ساهم في تصميمه والتطوير فيه

السلام عليكم ورحمة الله وبركاته اخواني واساتذتي وخبراء منتدانا الكرام حاولت جاهدا تصميم برنامج بسيط جدا وصغير يحتوي علي شاشة واحدة للادخالات كلها (شراء- بيع -رد شراء -رد بيع ) ولكني للاسف لم استطيع فهل الخطأ في الفكرة نفسها ام في العلاقات بين الجداول ام ماذا لا ادري فارجو من اخواني واساتذتي المساعدة ولكم مني جزيل الشكر والعرفان الي حضراتكم قاعدة البيانات all.accdb

فضلا وتكرما من حضرتك ممكن تطبيق علي الملف المرفق

خبراء منتدانا الجميل يارب تكونوا جميعا بخير واكيد هناك الكثير الذين لم اذكرهم فمحدش يزعل @Eng.Qassim @Moosak @محمد ايمن @ابوخليل @kkhalifa1960 @

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

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

اخي الحبيب @Eng.Qassim كل الشكر والتقدير لاخي وحبيبي واستاذي المهندس عصام شوية شوية و هتعلم كل حاجه باذن الله هههههههه ادامكم الله لنا

وعليكم السلام ورحمة الله وبركاته بارك الله فيك اخي الفاضل الكريم وجزاك الله خيرا المشاركة نورت بوجودك

حبيبي الغالي ليس علي المعلم ان يتأسف بارك الله فيك تم الامر كما تمنيت فجزيت عني كل خير ومع طمع التلميذ المحمود ارجو معرفه ما معني هذا السطر الاول والثالث DoCmd.SetWarnings False DoCmd.OpenQuery "qryDelete" DoCmd.SetWarnings True Me.Refresh

هندسة الملف المرفق تبارك الله بس هو ده لي انا فين زر التعديل اللي بيشغل استعلام الحذف ربي يعطيك الصحة والعافية ويزيدك الله علما