تحديث البيانات في النموذج المستمر

[shod90]

السلام عليكم و رحمة الله و بركاتة

عندي مشكلة في النموذج المستمر (continuous form)

كما هو مرفق في الصورة عندي مرتبات الأشخاص إذا أردت زيادة المرتب لجميع الأشخاص بقيمة معينة مثلا 500 

بيغير المرتبات كلها بناءً علي أول مرتب و بكده كل المرتبات تبقي 5000

مع ان في موظفين رواتبهم أكثر و أقل من 4500 

هل من مساعد .. هذا هو الكود الخاص بي

اقتباس

    Dim sql_statment As String
    sql_statment = "update Employees set salary = " & Salary + SalaryIncrement & " where Category = '" & Cat & "'"
    DoCmd.RunSQL sql_statment

[صالح حمادي]

السلام عليكم

غير هذا السطر الأخير :

DoCmd.RunSQL sql_statment

بهذا السطر:

CurrentDb.Execute sql_statment

[رمهان]

10 ساعات مضت, shod90 said:

 

    sql_statment = "update Employees set salary = " & Salary + SalaryIncrement & " where Category = '" & Cat & "'"

بعد اذن الاساذ صالح

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

هنا جرب الجملة التالية بديلا للجملة اعلاه

sql_statment = "update Employees set salary = Salary +" & SalaryIncrement & " where Category = '" & Cat & "'"

وهنا ملاجظة بان المشكلة ستضل قائمة بان الفئة هي نفسها فئة اول سجل لذلك يمكنك وضع قيمتها يدوي اسوة بقيمة الزيادة

 

واخيرا للاستاذ صالح اعتقد ليس هناك فرق بين الجملتين في النتيجة ولكن قد يكون هناك فرق في السرعة والفرق الظاهر هو اختلاف المكتبة حيث الاولى مستخدمة كائنات الاكسس والاخرى كئنات dao

تحياتي للجميع

[صالح حمادي]

1 ساعه مضت, رمهان said:

واخيرا للاستاذ صالح اعتقد ليس هناك فرق بين الجملتين في النتيجة ولكن قد يكون هناك فرق في السرعة والفرق الظاهر هو اختلاف المكتبة حيث الاولى مستخدمة كائنات الاكسس والاخرى كئنات dao

نعم استاذ رمهان هذا صحيح شكرا جزيلا