[علوش]

لدي جدول فيه التاريخ والميلغ اريد ان اقوم بجمع عدة حقول بتاريخ معين
text2 التاريخ label1 المجموع
ولاكن في رسالة خطاء وهي
run time error '2147217913 80040e07
النص
نوع البيانات غير متطابق فيتعبير المعايير
وهذا الكود


If rs.State = 1 Then rs.Close
DoEvents

rs.Open "Select SUM(many) as many From tot where da='" & Text2.Text & "'", db, adOpenKeyset, adLockPessimistic
DoEvents


If rs.RecordCount > 0 Then
Label1.Caption = rs![many]
DoEvents
Else
Label1.Caption = "0"
DoEvents
End If
If rs.State = 1 Then rs.Close
DoEvents