اسلام الكبابى

تعديل بعض السجلات بشرط معين

5 ردود في هذا الموضوع

لدى قاعدة بيانات بها جدول EMPLOYEE  به حقل للعمر AGE وحقل للمرتب SALARY
ولدى Adodc1 متصل بهذا الجدول 
وأريد تعديل المرتب فى جميع السجلات التى فيها يزيد العمر عن 60 سنة الى 4000 جنيه

فهل من كود باستخدام الFIND  أو  الWHERE  أو غيرها يقوم بذلك ؟
بحيث لا يكون الكود عبارة عن لوب أمر به على جميع السجلات(500 سجل مثلآ)
و فى كل مرة أضع الشرط        If .Fields("AGE") > 60 Then .Fields("SALARY") =4000
ليعدل لى فى النهاية 4 أو 5 سجلات مثلآ

ولكم ألف شكر
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ألا توجد أى طريقة لذلك ؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

ألا توجد أى طريقة لذلك ؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

هذا هو الكود الذى أعرفه

With Adodc1.Recordset
    .MoveFirst
    Do Until .EOF
        If .Fields("AGE") > 60 Then .Fields("SALARY") = 4000: .Update
    If Not .EOF Then .MoveNext
    Loop
End With

  فهل من كود أسهل من ذلك بحيث لا  يمر على جميع السجلات(500 سجل مثلآ)
و فى كل مرة يقرأ الشرط        If .Fields("AGE") > 60 Then .Fields("SALARY") =4000
ليعدل لى فى النهاية 4 أو 5 سجلات مثلآ

ولكم ألف شكر

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

عرفت الحل   والحمد لله
من أراد معرفة الحل فليفتح الرابط  http://vb4arb.com/vb/thread-16758.html
وليقرأ حل الأستاذ/
Ahmed_Mansoor

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

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



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .