كيف نغير الاسماء الموجودة بالـ Listview على حسب رقم الـ Id الخاص بها يوجد مثال مرفق + صورة

أهلا أخي الكريم

- تم عمل ماذكرته في المثال .

Project1-Fixed.rar

شكراً أخي al7ndeem اله يعطيك العافية

ولكن أخي المثال اللي ارفقته يقوم بتغيير أول سطر بس

وما يغير الباقي

انا كنت اريد ان يغيير كل اللي الاسماء الموجودة بالـ ListView

يعني اي اسم مثلاً اسمه احمد موجود في الـ ListView

اريده مثلا ان يغيره إلى أي اسم ثاني احدده انا من الحقل الاحمر

ولكن اريده ان يغير كل الموجود في الـ ListView

يعني لو الـ ListView يوجد بها 10 اسماء والداتا بيز يوجد بها 50 اسم

اريده ان يغيرلي الـ10 أسماء الموجودين بالـ ListView

وينحفظ التعديل بعدين بالداتا بيز فوق الـ  10 اسماء الموجودين بالداتا بيز

وشكراً لك مرة أخرى

أنتظر ردك أخي العزيز

السلام عليكم

- هذا كود الزر أنسخه وألصقة في داخل كود الزر :

Dim I As Long


For I = 1 To ListView1.ListItems.Count


    If RS.State = adStateOpen Then RS.Close
    RS.Open "select * from Table1 where id=" & Val(ListView1.ListItems.Item(I).Text) & _
            " AND Name ='" & Trim$(Text2.Text) & "'", DB, adOpenDynamic, adLockPessimistic
    DoEvents


    If RS.RecordCount > 0 Then
       RS![Name] = Trim$(Text1.Text)
       DoEvents
       RS.Update
       DoEvents
    End If


Next


Me.FillList


MsgBox "تم التعديل"

الله يبارك فيك اخي العزيز al7ndeem

وجعلها الله إن شاء الله بميزان حسانتك

شكراً لك