11-04-13, 03:12 AM
اخواني ارفقت صورة الخطاء بعد تعديل الكود الى
If rs.State = 1 Then rs.Close
rs.Open "Select SUM(many) as many From tot where da=#" & Text2.Text & "#", db, adOpenKeyset, adLockPessimistic
Label1.Caption = rs![many]
ارجو الاطلاع
[ATTACH=CONFIG]2383[/ATTACHنوع الخطاء
run time error 94
invalid use of null
If rs.State = 1 Then rs.Close
rs.Open "Select SUM(many) as many From tot where da=#" & Text2.Text & "#", db, adOpenKeyset, adLockPessimistic
Label1.Caption = rs![many]
ارجو الاطلاع
[ATTACH=CONFIG]2383[/ATTACHنوع الخطاء
run time error 94
invalid use of null
