kkhalifa1960

تفضل أخي توحيد فورمات الوقت لجميع حقول الوقت بالجدول ... وتغديل معادلة الوقت الاضافي وانظر للمرفق جيداً ووافني بالرد Database 04.rar

هذا مثال للتقويم الهجري وام القرى والميلادي لمشرفنا القديم أبو هادي أكيد بينفعك NewCalendar.rar

استكمالا لما قام به استاذنا موسى تفضل f6-1.rar

البرنامج ممكن يفتح بــ (AccessFIX) لكن بدون أكواد

وين المثال كي نعمل عليه ووضح المطلوب به .

استاذي انا مهمتي ضبط الكود كي يعمل وأنت أدرى بالباقي

اختارها من عندك افضل اجابة

تفضل أخي أنا جربت عندي Private Sub btn_supprimer_Click() Dim rs As Recordset, Quantite As Long Set rs = CurrentDb.OpenRecordset("SELECT * FROM Sorties WHERE id=" & Me.txt_id & " ") If Not rs.EOF Then Quantite = rs("Quantite") rs.Close DoCmd.SetWarnings False DoCmd.RunSQL "DELETE FROM Sorties WHERE id=" & Form_Sorties.txt_id DoCmd.RunSQL "UPDATE Stock SET Sortie=Sortie-" & Quantite & " WHERE id=" & Me.txt_id & " " DoCmd.SetWarnings True Form_Sorties.Requery Else MsgBox "L'enregistrement que vous essayez de supprimer n'existe pas !", vbCritical, "Erreur" End If Set rs = Nothing End Sub

وتفضل بعد التعديل ووافي بالرد 752محاسبة2018 مستودعات.rar

نفعت معك يامالك الحرايزة لاني جربتها على حقل شطب فقط وخصائصه في الاستعلام كما قال لك أخي أبو أحمد ( تنسيق General Number) وهذه صورة الناتج

باين عليا الكبر شاين

حضرتك استخدمت الدالة {AA: Sum(Nz([شطب];0)) } لحل مشكلة الاصفار تمام ولحل مشكلتك الحالية استخدم دالة التقريب { bb: Round([AA];2) } لاقرب رقميين عشريين

ارفق مثالك أخي لمساعدتك

تفضل أخي Set rs = CurrentDb.OpenRecordset("Select * From Stock Where id=" & Me.article &" ")

تفضل أخي ووافني بالرد عاطف1452 (2).rar

تفضل اخي ووافني بالرد برنامج-1.rar

شكرا لك يا دكتور جمال الله يجعله في ميزان حسناتك🌹

وين رد الاستاذ سامر محمود ؟؟؟؟

من فضلك ارفق مثالك للعمل عليه

اخي لسهولة التعامل مع الجداول الحقول باللغة الانجليزية مختصرة ووجود حقل في كل الجداول وليكن نوع الوقود ورقمه علشان الربط بينهة وعدم تكرار الحقول الباقية بالجداول حيث وجدت حقول متشابهه بالجدولان 1و3 والجدولان 2و4 والجداول لابد ان تحتوي بما تطلبه بالتقرير ابدأ بذلك والكل بيساعدك

مشاركة مع احبابي واساتذتي اقدم لكم برنامج صلاحيات وبه مطلب الاستاذ سامر محمود ( اخفاء حقل معين من تقرير اكس عن طريق شاشة صلاحيات الموظفين ) 1-أدخل مرة باسم mahdi والباس 1960 ثم افتح التقرير سيظهر لك الحقل T11 وبياناته بالتقرير لان مهدي عنده صلاحية 2-أدخل مرة باسم Ali والباس 111 ثم افتح التقرير سيختفي لك الحقل T11 وبياناته بالتقرير لان علي ليس عنده صلاحية جربوه ووافوني بالرد 255.rar

أخي الفاضل اذهب للتقرير في وضع التصميم وضع هذا السطر بدلاً من المكتوب (SELECT TOP 2 * FROM Max_slaes; ) في مصدر البيانات (record source) حيث (2) عدد الادخلات الاخيرة وتغيرها حسب عدد الادخالات انا مجربها عندي وتعمل تمام التمام

وهذه محاولة أخرى 1- بعد ادخالك البيانات بالنموذج طبعاً عدة ادخالات حالية تريد طباعتها ولكن التقرير لايظهر الا سطر واحد لان مافي تقرير مستمر . 2- كي تنفذ مرادك وانت محدد على النموذج بيسار القاعدة اذهب الى ملف ثم طباعة ثماول اختيار QUICK PRINT ثم أدخل أي اسم ثم حدد مكان الحفظ ثم حفظ ثم اذهب مكان الحفظ بتحصل مرادك . 3-ووافني بالرد .

الحين فهمت قصدك 1- بعد ادخالك البيانات بالنموذج طبعاً عدة ادخالات حالية تريد طباعتها ولكن التقرير لايظهر الا سطر واحد لان مافي تقرير مستمر . 2- كي تنفذ مرادك وانت محدد على الموذج بيسار القاعدة ونفذ مالصورة ( فكرة استاذ جعفر في مشارة سابقة ) ولكن تنبة التقرير سيظهر محتويات النموذج لمرة واحدة أطبع الان لانك لو اغلقت التقرير الجديد وحبيت تفتحه مرة أخرى سيفتح على ريكورد واحد فقط وسيطلب منك تحديده . 3- انظر مافي الصورة ووافني بالرد .

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