مشکل در پاک کردن آخرین ردیف بانک اطلاعاتی

[toytown]

سلام دوستان
در برنامه زیر من تو دکمه پاک کردن یک ردیف از کد زیر استفاده کردم

On Error GoTo error:
Adodc1.Recordset.Delete
error:
err_hdl = Err.Number
If err_hdl = -2147467259 Then
Exit Sub
End If

اما این کد ردیف بالایی بانک اطلاعاتی رو پاک میکنه برای پاک کردن ردیف پایینی باید چه کدی در این دکمه بنویسم

[kitcat_m18]

دوست عزیز این کد ردیف بالایی رو پاک نمی کنه رکوردی رو که انتخاب شده پاک می کنه، یعنی با توجه به موقعیت Record Selector رکورد رو پاک می کنه

[toytown]

خوب چه طور میشه رکورد سلکتور رو روی آخرین ردیف قرار داد