ปุ่ม ลบ record ไม่ ลบ record ที่ show อยู่ใน form
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 257   2
URL.หัวข้อ / URL
ปุ่ม ลบ record ไม่ ลบ record ที่ show อยู่ใน form

ผมใช้ code นี้
Dim intdel As Integer, RST As DAO.Recordset, DBS As DAO.Database
Set DBS = CurrentDb
Set RST = DBS.OpenRecordset("expense_transaction")
intdel = MsgBox("Are you sure?", vbCritical + vbYesNo, "Delete Record")
If intdel = vbYes Then
RST.Delete
End If
ลบ record ครับ มันลบได้ครับแต่ว่า มันไม่ได้ลบ record ที่ show อยู่ใน form ครับ แต่ว่า มันจะไปลบ record แรก สุดของตารางนี้
เช่น ว่า recordที่ 1 , 2 และ 3 ผมจะลบ record ที่ 3 มันจะลบ record แรกสุดของตารางก่อนครับ

ไม่ทราบว่า code นี้ ขาดอะไรไปหรือเปล่าครับ

2 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R03262
โค้ดดังกล่าวเป็นการเปิดตารางเป้าหมาย แล้วก็สั่งให้ลบข้อมูลแรกที่เจอเลย จึงทำให้มันลบแต่ข้อมูลแรกอย่างเดียว

ต้องเพิ่มส่วนของเงื่อนไขลงไปด้วยครับ

แต่ผมว่าใช้ acCmdDeleteRecord จะดีกว่า

ให้ค้นด้วยคำว่า acCmdDeleteRecord ในเว็บบอร์ดนี้ดูครับ
2 @R03299
ขอบคุณครับ ทำได้แล้วครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.0543s