عندما استخدم الdao لكي اعدل علي بيانات بالجدول فإنني الكتب الكود التالي في زر أمر
Dim db As Database, rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset(" select * from emp where [emp_id] = & myval & ", dbOpenDynaset)
With rs
Me.emp_id = ![emp_id]
Me.emp_name = ![emp_name]
Me.s_date = ![s_date]
Me.jop_status = ![jop_status]
Me.jop = ![jop]
Me.ex_date = ![ex_date]
Me.company_id = ![company_id]
End With
rs.Close
حيث ان
كود العامل = myval
وعندها تظهر رسال تقول
Data type mismach in cartiera expriton
فما هو الحل