22-07-13, 05:21 PM
بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته,إخواني الافاضل, يوجد لدي مشكلة في الكود التالي:
PHP كود :
Dim DA As New OledbAdapter = ("SELECT emp_name.Emp_Tbl, emp_age.Emp_Tbl, emp_year.Emp_Tbl, emp_salary.Emp_Tbl FROM Emp_Tbl WHERE emp_year.Emp_Tbl = '" & ComboBox1.SelectValue & "'", Cn)
Dim DS As New DataSet
DS.Clear()
DA.Fill(DS,"Table")
PHP كود :
DA.Fill(DS,"Table")
و رسالة الخطأ هي:
كود :
DataType Mismatch in criteria expression
مع العلم, إن نوع بيانات الحقل emp_year.Emp_Tbl هو Integer في قاعدة البيانات من نوع Access.
و إن الـ ComboBox1 مملوء من ذلك الحقل.
و حاولت عمل التالي:
PHP كود :
Dim A1 As Integer = Convert.ToInt16(ComboBox1.SelectedValue)
Dim DA As New OledbAdapter = ("SELECT emp_name.Emp_Tbl, emp_age.Emp_Tbl, emp_year.Emp_Tbl, emp_salary.Emp_Tbl FROM Emp_Tbl WHERE emp_year.Emp_Tbl = '" & A1 & "'", Cn)
و تبقى نفس رسالة الخطأ.
ما هو الحل؟