สอบถามการอ้างอิง Edit แบบ adodb ครับ

[akekorn]

สวัสดีครับ เพื่อนสมาชิก ทุกท่าน
ผมรบกวนขอความรู้ครับ ว่าการ edit recordset แบบ adodb มีการอ้างอย่างไร
เพราะหากเป็น DAO
ผมจะเขียน
rst.edit
rst.field(0) = txt1.value
rst.field(1) = txt2.value
rst.update

แต่ ADO ไม่ทราบว่าอะไร ที่แทน rst.edit เพราะลองใช้ rsEmployees.EditMode = adEditInProgress
จะขึ้น error Can't assign to read-only property
ผมจึงขอความอนุเคราะห์ว่าต้องเขียนลักษณะใดครับ ถึงจะแก้ไข recordset ที่ทำไว้เดิมได้
ขอบคุณครับ

[PNR]

Private Sub Command2_Click()
  Dim rst As ADODB.Recordset
  Set rst = New ADODB.Recordset
    rst.Open "Table1", CurrentProject.Connection, adOpenStatic, adLockOptimistic
         rst.Supports (adUpdate)
         rst.field(0) = txt1.value
         rst.field(1) = txt2.value
         rst.Update     
         rst.close
         rst = nothing

End Sub

ลองดูครับ ว่าได้ไหม

[akekorn]

อาจารย์ครับ ขึ้นError ตรง rst.update ครับผม

[สันติสุข]

น่าเปลี่ยนจาก adOpenStatic ไปเป็น adOpenDynamic นะครับ

[akekorn]

เปลียน เป็น adOpenDynamic ไม่ขึ้น error แต่รัน แล้วไม่ update record ใหม่ให้ครับผม

[PNR]

ขอทราบ Error ที่แสดงหน่อยครับ ขึ้นว่าอะไร

[akekorn]

ไม่ error ครับ แต่ ไม่update ข้อมูลที่ได้ทำการแก้ไขครับ

[PNR]

อาจารย์ครับ ขึ้นError ตรง rst.update ครับผม

ฟ้อง error ว่าอะไรหรอครับ

[akekorn]

ได้แล้วครับ อาจารย์ ขอบคุณอาจารย์ และ เพื่อนสมาชิกทุกท่านนะครับในความอนุเคราะห์ครับผม