اذهب الي المحتوي
أوفيسنا

ازهر عبد العزيز

04 عضو فضي
  • Posts

    1331
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو ازهر عبد العزيز

  1. وعليكم السلام ورحمة الله وبركاتة ادخل غلى ملف ثم خيارات قم خيارات قاعدة البيانات الحالية ستجد كما في الصورة نموذج بدئ التشغيل اذا كان موجود بالامكان تغيره اذا اردت الى نموذج اخر
  2. اضف هذا الكود للحدث الذي تريدة With CodeContextObject If (IsNull(.Enddate) Or IsNull(.Strdate)) Then Beep MsgBox "error23", vbOKOnly, "" End If End With
  3. السلام عليكم لدي قاعدة بيانات يصيغة accbd تعمل بشكل طبيعي لكن عند تحويلها الى accde ينم التحويل لكن الاكواد البرمجية لاتعمل فقط الماكرو جريت التحويل على قاعدة بيانات اخرى لم اجد اي مشكلة فقط المشكلة في هذة القاعدة ارجو الحل
  4. اخي qathi عذرا لكن اين الاستعلامات في برنامجك فالاستعلامات هي افضل شئ في الاكسس عملت لك استعلام بسيط تستطيع معرفة الكمية المتوفره من خلالة من دون ان تقوم بانقاص الكمية في القائمة ولاني لا افهم طريقة عمل برنامجك عليك ان تستفيد من الحقل Expr1 في الاستعلام في برنامجك لمعرفة كمية الكتب المتوفرة فقط اضف هذا الحقل الى القائمة وضع الشرط المناسب في حال الكمية لاتسمح تحياتي InvoiceSale_9.accdb
  5. اعتقد ان الاساتذه هنا لايستخدمون اي واحدة من هذة في برامجهم ولكن لتسهيل الامر على السائل لانهم لابعرفون طبيعت برنامجه والدليل ما اشار به الاستاذ جعفر في مكان سابق بانة في احد برامجه اضظر لااستخدام هذة الطريقة لكنه رجع ووجد الخطا وانا عملت بنصيحته وبحثت ووجدت طريقة واستخدمت الكود التالي في بداية الحدث وتم حل المشكلة اضغه هنا لكي يستفاد الاعضاء الاخرين If Fbookmain.Form.RecordsetClone.RecordCount = 0 Then
  6. ههههههه يعجز اللسان عن الشكر
  7. جزيل الشكر للاستاذ المبدع @ابو جودي
  8. السبلم عليكم لدي هذا الكود للبحث داخل النموذج DoCmd.FindRecord Me.booknamex, acEntire, False, , True, acCurrent, True المشكلة اذا لم يكن هناك بيانات في النموذج تظهر لي رسالة بالخطا 2137 ارجو منكم المساعدة
  9. السلام عليكم احتاج كود لحفظ قاعدة بيانات بصيغة accde
  10. مبرمج متقاعد هههههههه طريقة غريبة جزيل الشكر
  11. السلام عليكم لدي هذا الكود rs.FindFirst "[bookname] = '" & stry & "'" الحقل bookname حقل نصي موجود في تفس النموذج لكن اصبح الحقل موجود في نموذج فرعي اسم هاذا النموذج fbooksub داخل نموذج رئيسي هو fbookmain ماحناجة هو كتابة مسار النموذج الفرعي من خلال النموذج الرئيسي فكيف تكون كتاية الكود ارجو ان تكون الفكرة واضحة لكم جزيل الشكر
  12. السلام عليكم في النموذج الموجود احناج عندما يكون محدد السجلات على احد السجلات يتغير لون السجل بالكامل او احد الحقول ملاحظة لا اقصد عندما يكون التركيز على احد الحفول لكن عندما يكون محدد السجلات مركز على احد السجلات كما في الصورة xy.accdb
  13. السلام عليكم ,,,,, اعضاء منتدى اوفيسانا الاعزاء لدي نموذج مكون من حقلان x , y قمت بتقسبم عدد الموجود في الحقل y على الغدد الموجود في الحقل x المشكلة لدي انة لايظهر الاعداد العشرية عند التقسبم كما في الصورة xy.accdb
  14. السلام عليكم هل بالامكان اضافة زر خانة الاختيار عن طريق الاستعلام وليس الجدول CHECK BOX.accdb
  15. السلام عليكم لدي هذة المعادلة البسبطة لكني احناج بديل لها تفوم بنفس الوظيفة Expr1: Nz([bookavailable]-[bookback];[bookavailable])
  16. استاذ @Moosak جزيل الشكر زهو المطلوب
  17. السلام عليكم في النموذج fa يوجد نموذج فرعي fa1 يحتوي على مربع تحرير وسرد numb احتاج عند اضافة اسم غير موجود يتم اضافة في الجدول tbb تحت الحقل nameb وان تكون قيمة المفتاح numb في الجدول tbb مساوية للاسم الجديد التي تمت اضافتة bl.accdb
  18. جزيل الشكر لكم @ابو جودي و @Moosak تم الحل جزاكم الله كل خير
  19. السلام عليكم لدي هذا الكود بظهر خطا عند تنفيذه ممكن تعدبل الخطا ="[Nameread]='" & [x1] & "'" And [dateread] Between Nz([Forms]![fmainreader]![x2]) And Nz([Forms]![fmainreader]![x3])
  20. شكرا جزيلا استاذ @Moosak لعلي لم اوضح السوال بشكل صحيح احناج جلب قيمة الحقل totalbook في الجدول tblaibrery بشرط اسم الكتاب واسم القارئ في النموذج وشكرا على المرفق الرائع
  21. السلام عليكم لدي نموذج finfo يحتوي ثلاثة حقول اسم الكتاب اسم القارئ وحقل للنتيجة احتاج جلب عدد قرات الكتاب من الجدول tblibrarey بعد اختبار اسم الكتاب واسم القارئ في نفس النموذج test5.accdb
×
×
  • اضف...

Important Information