BlogGang.com : : anchan42 : การเปิดตารางฐานข้อมูลใช้ใน VBA โดยใช้ ADODB.Recordset

การเปิดตารางฐานข้อมูลใช้ใน VBA โดยใช้ ADODB.Recordset

'ประกาศตัวแปลพร้อมจองหน่วยความจำสำหรับ object recordeset ชื่อ rsData
Dim rsData As New ADODB.Recordset
Dim strItemNumber As String
strItemNumber = "TEST"

'ตั้งค่า ActiveConnection ให้ Recordset ติดต่อไปที่ดาต้าเบสที่เปิดอยู่ปัจจุบัน
Set rsData.ActiveConnection = CurrentProject.Connection'

'เปิดตารางข้อมูล
rsData "tblData", , adOpenKeyset, adLockOptimistic, adCmdTable'

'ตั้งค่า Filter เพื่อกรองเอาข้อมูลที่ต้องการใช้
rsData.Filter = "ItemNumber ='" & strItemNumber & "'"

Create Date : 07 พฤษภาคม 2552

Last Update : 24 กันยายน 2553 11:36:33 น.

0 comments

Counter : 563 Pageviews.