منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
لدي جدول فيه التاريخ والميلغ اريد ان اقوم بجمع عدة حقول بتاريخ معين
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
ضع الكود التالي في الكوماند

كود :
Label1.Caption = "0"
If rs.State = 1 Then rs.Close
rs.Open "SELECT SUM(many) as total FROM tot where da='" & Text2.Text & "'", db, adOpenKeyset, adLockPessimistic

Label1.Caption = rs!total
rs.Close
نفس المشكلة ارجو الافادة
ارجو من الاخوان الافادة في الموضوع
السلام عليكم

- أخي علوش . تأكد أولا من صحة كتابة التاريخ . ثانيا تأكد من أن نوع الحقل da نصي لأنك أستخدم علامة التنصيص المفرد ' . وتأكد أيضا من أن نوع الحقل many رقمي أو عمله . وإذا إستمرت المشكلة فغير نوع الحقل da إلى "تاريخ وقت" وضع بدل علامة التنصيص المفرد # .

- تحياتي .
المشكلة عندك لأن الحقل من نوع تاريخ ولحل هذي المشكلة ضع الاستعلام هذا بدل السابق

rs.Open "SELECT SUM(many) as total FROM tot where da=#" & Text2.Text & "#", cn, adOpenKeyset, adLockPessimistic
اخواني ارفقت صورة الخطاء بعد تعديل الكود الى
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 Not IsNull(rs!many) Then Label1.Caption = rs!many Else Label1.Caption = "0"

- ومعنى الخطأ إن قيمة الحقل كانت فارغه لذلك لابد أن تتأكد القيمة الحقل ليست فارغه كما هو في هذا السطر المعدل .

- تحياتي .
اخوي vb_coder عافاك الله واشكرك على التفاعل معي ولاكن مازلت النشكلة لذلك ارفقت المثال للأطلع عليه
http://www.mediafire.com/?4ecdmcoh31vz95a
أهلا , قاعدة البيانات 2007 والأوفيس اللي عندي 2003 ولم اتعامل من قبل مع قاعدة بيانات بتنسيق 2007 .
الصفحات : 1 2