كيف يتم فرز حقول قاعدة بيانات

الفرز يتم عن طريق مصدر البيانات recordset

rs.open "select * from mytable order by name desc"

اخي الفاضل انا بقدر كل جهودك وبتشكرك كثير

لكن في سؤال سابق سألتك عن تحديث قاعدة بيانات واعطيتني الكود اللازم كخطوة اولى

والان في هذا السؤال تعطيني الكود ايضا

ممكن اخي العزيز ان تتفضل وتتكرم علي بمثال يجمع بين استعمال هذين الكودين في السؤالين السابقين لانه ولله ما

زبطت معي

وسواء اجبتني ام لم تجبني ان بتمنالك كل الخير وبقدر تعبك كثير

اين المثال السابق ؟

اخي لالم تعطني سوى هذا الكود ولا يوجد مثال فقط هذا الكود لسؤال تعديل قاعدة بيانات السابق

كودDo While Not rsNew.EOF

rsOld.Find "id=" & rsNew!id, , , adBookmarkFirst

Dim iLoop As Integer

If rsOld.EOF Then

' يمكن وضع كود لمقارنة بقية الحقول مثل الاسم وغيرها والتعديل بدل الاضافة

rsOld.AddNew

For iLoop = 0 To rsOld.Fields.Count - 1

rsOld(iLoop) = rsNew(iLoop)

Next

rsOld.Update

End If

rsNew.MoveNext

Loop

compdb.rar