DAO Recordset

การทำงานกับ DAO

DAO เป็นแบบจำลองที่ติดต่อโดยตรง Jet Engine และสามารถทำงานกับ Microsoft Access ได้ดี รวมถึงระบบฐานข้อมูลที่ใช้ ISAM เช่น Dbase FoxPro เป็นต้น

การสร้าง Recordset

การสร้าง Recordset ต้องมีการประกาศตัวแปรของอ๊อบเจคฐานข้อมูล (Database) และ recordset การสร้าง instance ใช้คีย์เวิร์ด Set โดยการสร้าง recordset ต้องใช้เมธอด OpenRecordset

Set recordsetname = databasename.OpenRecordset(source, [type, [options, [lock type]]])

โดย recordsetname เป็น ชื่อ recordset, databasename เป็น ชื่อ ฐานข้อมูลที่ติดต่อ, source เป็น ชื่อ table คิวรี่ หรือคำสั่ง SQL ที่เป็นแหล่งข้อมูลของ recordset, type เป็น ประเภท recordset, option เป็น ตัวเลือกสำหรับการควบคุม recordset , lock type เป็น ประเภทการล๊อกเรคคอร์ดเมื่อเปิด recordset

พารามิเตอร์ type สามารถกำหนดได้ 3 แบบ คือ

1. dbOpenTable เป็นชุดเรคคอร์ดสร้างจาก table เท่านั้น
2. dbOpenDynaset เป็นชุดเรคคอร์ดที่ปรับค่าได้ สามารถมาจาก table, คิวรี่ หรือ ประโยคคำสั่ง SQL
3. dbOpenSnapshot เป็นชุดเรคคอร์ดที่อ่านอย่างเดียว สามารถมาจาก table, คิวรี่ หรือ ประโยคคำสั่ง SQL

ตามตัวอย่างการสร้าง instance ของฐานข้อมูลใช้ฟังก์ชัน CurrentDB ซึ่งทำให้สามารถติดต่อกับฐานข้อมูลโดยไม่จำเป็นต้องทราบชื่อฐานข้อมูล (ดูฟังก์ชัน CurrentDB จาก Access Function ชุด Database)

Dim MyDb As Database
Dim rst As Recordset

Set MyDb = CurrentDb
Set rst = MyDb.OpenRecordset("DaoData", dbOpenTable)

ดาวน์โหลดตัวอย่าง

การเพิ่มข้อมูลด้วย Recordset
การปรับปรุงข้อมูลด้วย Recordset
การลบข้อมูลด้วย Recordset

หัวข้อเพิ่มเติม

การเพิ่มข้อมูลด้วย Recordset
การปรับปรุงข้อมูลด้วย Recordset
การลบข้อมูลด้วย Recordset
การค้นหา