ช่วยดูโค้ด ที่จะเปลี่ยนจาก VB เป็น Access ให้ผมด้วยครับ
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 232   1
URL.หัวข้อ / URL
ช่วยดูโค้ด ที่จะเปลี่ยนจาก VB เป็น Access ให้ผมด้วยครับ

คือผมใช้ VB ติดต่อกับฐานข้อมูล Access ผ่านทางAdodc1 แล้วเขียนโค้ด เพื่อค้นหาเลขทะเบียน
และใช้ได้โดยไม่มีปัญหาอะไร

แต่ผมอยากทราบว่า ถ้าผมจะใช้ฟอร์มของ Access ทำการค้นหาลักษณะแบบนี้ เราจะต้องเขียน โค้ดยังไงครับ เปลี่ยน จาก Adodc1

Private Sub CmdSearch_Click()
Dim userCriteria As String
userCriteria = "reg_no like ' " & Text3.Text & " ' "
If Text3.Text = " " Then
MsgBox "ยังไม่ได้ป้อนคำค้นครับ", vbYes, "แจ้งข้อผิดพลาด"
Else
With Adodc1.Recordset
.MoveFirst
.Find userCriteria, , adSearchForward
End With
End If
If Adodc1.Recordset.EOF Then
MsgBox "ไม่พบข้อมูลที่ต้องการค้นหา", vbYes, "ผลการค้นหา"
End If

End Sub



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

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