73
ห้อง MS Access / : การแสดงรหัสไปรษณีย์ จากการใช้เครื่องอ่านบัตรประชาชน
« เมื่อ: 25 มิ.ย. 63 , 13:57:14 »น้องไปแก้ Event ของ คอมโบบ๊อก cb_district AfterUpdate เป็นแบบนี้นะครับ
Private Sub cb_district_AfterUpdate()
Me.txt_zipcode = DLookup("post_code", "tb_district", "district_th= '" & Replace(Me.cb_district, "แขวง", "") & "' AND amphur_id = " & Me.cb_amphur.Column(0, Me.cb_amphur.ListIndex))
End Sub
โดยเครื่องแสกนถ้าได้คำว่าแขวงติดมา แต่ตอนจะแสดงข้อมูลเราใช้ Replace ตัดแขวงออกให้ก็จะแสดงข้อมูลได้ปกติ
ไม่ได้ค่ะ จังหวัดกับอำเภอก็น่าจะมีคำว่าจังหวัดกับเขต อำเภอมาด้วย รบกวนแนะนำอีกครั้งด้วยค่ะ ขอบคุณค่ะ