أيمن عبادي

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

اخواني الاعزاء لقد قمت بوضع هذا الكود الخاص بعمل نسخة الاحتياطية ويعمل ولكن قاعدة البيانات تظهر بدون أيكونة الأكسيس بعد أن يتم عمل نسخة احتياطية لها فهل من خطأ في الكود Private Sub Form_Close() On Error Resume Next '------- by caboon ----- Dim OldFile As String, DBwithEXT, DBwithoutEXT, NewFile As String, CopyMyDB OldFile = [StrOld] DBwithEXT = Dir(OldFile) DBwithoutEXT = Left(DBwithEXT, Len(DBwithEXT) - 4) If [BKUP] = True Then NewFile = Me.StrNew & "\" & DBwithoutEXT & "-" & Format(Date, "yyyy-mm-dd") & "-" & Format(Now(), "Hh-Nn-Ss-AMPM") & Right(DBwithEXT, 4) CopyMyDB = "cmd.exe /C copy " & """" & OldFile & """" & " " & """" & NewFile & """" Shell CopyMyDB, 0 Exit Sub End If End Sub ---------------------------------------------------------------------------------------- Private Sub Form_Load() On Error Resume Next [StrOld] = CurrentDb.Name [StrNew] = "D:\LaundrySoftware\" End Sub بوركتم جميعا

السلام عليكم بوركت أخي الكريم فعلا أخي الملف يعمل بكفاءة علي جزيت خيرا وكثر الله من أمثالك

السلام عليكم أخواني الكرام أتمنى أن تكونوا بخير وبصحة جيدة في المرفق يوجد ورقتين، الورقة الأولى تحتوي على نموذج التقويم والورقة الثانية على جدول المواعيد للدورات والمطلوب في حالة وجود موعد بتاريخ معين في جدول المواعيد أن تظهر خلفية باللون الأصفر لنفس التاريخ في التقويم وشكرا لسيادتكم Copy of Training Plan - Master - Final 2021.xlsx

بوركت أخي husamwahab هذا المطلوب تماما قد تكون صحيحه Hawiiiولكن ملاحظة أخي واعتقد أنه يوجد حل عن طريق كود في الاستعلام شاكرا للجميع وبوركت جهودكم

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

اخواني الاعضاء المحترمين تحية طيبة هذا كود طباعة السجل الحالي DoCmd.OpenReport "Item History_R", acViewNormal, , "[item id]=forms![items_f]![item id]" وارغب باظهار مربع حوار الطباعة لاختيار الطباعة المناسبة، فكيف يمكن تعديل الكود وشكرا لسيادتكم

بوركت أخي محمد أبوعبدالله ولكن بسبب تشعب الموضوع المذكور بصراحة شديدة ضعت ولم أفهم ، اعذرني أخاك لا يزال مبتدأ بوركت أخي محمد الحلواني، لقد قمت باضافة ptrsafe كما ذكرت، فعلا اختفت الرسالة، ولكن لم يعمل الزر الخاص باختيار الصورة ارجو مساعدتي بوركتم جميعا

السلام عليكم اخواني قمت بتحميل هذا البرنامج من منتدانا ولكن يعطيني رسالة خطأ لانه يوجد اختلاف في نسخة الاكسيس 32 بت وبين 64 بيت فما الفرق؟ وماذا افعل لكي يعمل البرنامج على نسخة اكسيس 2013 بوركتم Album.rar

بوركت أخي العزيز husamwahab هذا المطلوب جزيت خيرا

السلام عليكم أخواني الاعزاء أرجو التكرم بمساعدتي في جمع عدة حقول رقمية ونصية في مربع النص واحد إذا كانت القيمة أكبر من صفر ًجزيتم خيرا My New App.accdb

بوركت أخي العزيز ،،، كله تمام ألف شكر متمنيا لهذا المنتدى المزيد من التقدم والنجاح

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

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

؟ 😭