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

كود الحاق و تحديث قيمة


إذهب إلى أفضل إجابة Solved by ابو ياسين المشولي,

الردود الموصى بها

السلام عليكم و رحمة الله و بركاته .. اساتذتي الأعزاء

المطلوب هو اضافة القيمة في الحقل end في النموذج و جمعها مع قيمة الحقل  knaw في الجدول ntak  و ليس استبدال القيمة و الشرح موجود بالمرفق 

كل الاحترام و التقدير لكم 

Microsoft_Access_قاعدة_بيانات_جديد.accdb

رابط هذا التعليق
شارك

اتفضل

DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE ntak, ntak1 SET ntak.knaw = ntak.knaw +[Forms]![نموذج1]![end] " & vbCrLf & _
"WHERE (((ntak1.esm)=[Forms]![نموذج1]![نص611]));"
DoCmd.SetWarnings True

 

  • Like 1
رابط هذا التعليق
شارك

  • أفضل إجابة

انا مشيت على ملفك الاول كان الشرط الاسم مثل اسم الجدول الاخر

اتفضل التعديل

DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE ntak SET ntak.knaw = ntak.knaw+[Forms]![نموذج1]![end]" & vbCrLf & _
"WHERE (((ntak.esm)=[Forms]![نموذج1]![نص611]));"
DoCmd.SetWarnings True

 

Microsoft_Access_قاعدة_بيانات_جديد (1).accdb

  • Like 1
رابط هذا التعليق
شارك

جزاك الله خيرآ أستاذي الكريم  @ابو ياسين المشولي

هذا هو المطلوب 

ولكن يوجد مشكلة أخرى إن أمكن 

في الحقل نص611 يوجد اسم العميل لنفرض اني أخطأت بتحديد الاسم فبذلك قمت باضافة المبلغ الى عميل خطأ و عندما اريد اضافة القيمة للعميل الصحيح سيتم الاحتفاظ بالقيمة المالية القيمة المدخلة خطأ .. هل يمكن أن يتم حذفها تلقائيآ من حساب العميل الأول  ؟

تم تعديل بواسطه mohamad dahleek
رابط هذا التعليق
شارك

هو مشروط بسم العميل واسم العميل  المفروض لا يتكرر

واذا كان كما تقول اعمل زر اخر وبدل زايد اجعلها ناقص

تم تعديل بواسطه ابو ياسين المشولي
  • Like 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information