ปัญหา Run-time error 3075 แก้ไงครับ



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

01 ส.ค. 63 , 23:25:17
อ่าน 37 ครั้ง

Piyawat Sasikul

  • สมาชิกไท.Access
  • กระทู้: 2

    • ดูรายละเอียด

ปัญหา Run-time error 3075 แก้ไงครับ
« เมื่อ: 01 ส.ค. 63 , 23:25:17 »
Private Sub SearchCombo()
 Dim sql As String
 sql = "SELECT*FROM SecName WHERE[NameEmp]='" & Me.Combo1 '"
Forms!Frm_SearchCombo!Frm_Search.Form.RecordSource = sql
Forms!Frm_SearchCombo!Frm_Search.Form.Requry
End Sub

Private Sub Combo1_AfterUpdate()
SearchCombo
End Sub




 

02 ส.ค. 63 , 01:05:16
ตอบกลับ #1

สันติสุข

: ปัญหา Run-time error 3075 แก้ไงครับ
« ตอบกลับ #1 เมื่อ: 02 ส.ค. 63 , 01:05:16 »
ขาดบางตัวไป และควรเว้นวรรคสักหน่อยในแต่ละคำใน SQL

sql = "SELECT * FROM SecName WHERE NameEmp = '" & Me.Combo1 & "'"

และพอกำหนด .RecordSource แล้ว ระบบจะอ่านเรคอร์ดเข้ามาแสดงบนฟอร์มอยู่แล้ว ไม่จำเป็นต้องสั่ง .Requery ให้ทำงานซ้ำครับ
ช่วยพกถุงผ้า/ถุงพลาสติกใช้แล้วไปซื้อของเพื่อลดการใช้พลาสติก ขยะ รักษาสิ่งแวดล้อม และไม่ให้ภาวะโลกร้อนวิกฤติเร็วขึ้นกว่านี้
ช่วยคลิกโฆษณาข้างล่างนี้ เพื่อสนับสนุนเวปบอร์ดด้วยครับ
:nice day:
 
โพสต์นี้ได้รับคำขอบคุณจาก: Piyawat Sasikul

02 ส.ค. 63 , 10:39:52
ตอบกลับ #2

Piyawat Sasikul

  • สมาชิกไท.Access
  • กระทู้: 2

    • ดูรายละเอียด

: ปัญหา Run-time error 3075 แก้ไงครับ
« ตอบกลับ #2 เมื่อ: 02 ส.ค. 63 , 10:39:52 »
ขอบคุณมากครับ คุณสันติสุข

 


บอร์ดเรียนรู้ Access สำหรับคนไทย