การเรียก Recordset จาก Primary Key
กระทู้เก่าบอร์ด อ.Yeadram

 1,066   3
URL.หัวข้อ / URL
การเรียก Recordset จาก Primary Key

การเรียก Recordset จาก Primary Key ชนิด Field เป็น AutoNumber สามารถใช้งานได้ปกติ
แต่ผมมี Primary Key ชนิด Field เป็น text ที่ต้องการดึง Recordset ขึ้นมา ไม่สามารถใช้ Code
นี้ได้ครับ อยากขอให้ท่าน อ. หรือ ท่านผู้รู้ ช่วยแนะนำด้วยครับ

สามารถใช้งานได้ปกติ
======Primary Key ชนิด Field เป็น AutoNumber========
Private Sub Combo_PO_ID_AfterUpdate()
    ' Find the record that matches the control.
    Me.RecordsetClone.FindFirst "[PO_ID] = " & Me![Combo_PO_ID]
    Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub
======Primary Key ชนิด Field เป็น AutoNumber========
.
.
.
ไม่สามารถใช้งานได้
========Primary Key ชนิด Field เป็น text ===========
Private Sub Combo_ST_ID_AfterUpdate()
    ' Find the record that matches the control.
    Me.RecordsetClone.FindFirst "[ST_ID] = " & Me![Combo_ST_ID]
    Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub

อยากขอให้ท่าน อ. หรือ ท่านผู้รู้ ช่วยแนะนำด้วยครับ
ผมเข้าใจว่าต้องประกาศค่าตัวแปรก่อน เช่น..
    Dim strWhere As String
    strWhere = "ST_ID = '" & Me.Combo_ST_ID & "'"
แต่ลองแล้วไม่สำเร็จครับ
========Primary Key ชนิด Field เป็น text ===========

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

1 @R14058
รูป Error เพิ่มเติมครับ..

2 @R14060
Me.RecordsetClone.FindFirst "[ST_ID] = " & Me![Combo_ST_ID]

น่าจะเป็นที่ Data Type หรือเปล่าครับ พอเป็น Text ต้องใช้ ' (single quote หรือ double quote) คร่อมที่เงื่อนไขครับ ประมาณนี้

Me.RecordsetClone.FindFirst "[ST_ID] = '" & Me![Combo_ST_ID] & "'"
3 @R14061
ขอบคุณมากครับ คุณ TTT ผมปรับโค๊ดตามที่แนะนำมาใช้ได้เลยครับ
ขอบคุณอีกครั้งที่สละเวลาตอบครับ..
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3119s