منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين (/showthread.php?tid=8420)

الصفحات: 1 2

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - علوش - 10-04-13

لدي جدول فيه التاريخ والميلغ اريد ان اقوم بجمع عدة حقول بتاريخ معين
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

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - حريف برمجة - 10-04-13

ضع الكود التالي في الكوماند

كود :
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


يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - علوش - 11-04-13

نفس المشكلة ارجو الافادة

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - علوش - 11-04-13

ارجو من الاخوان الافادة في الموضوع

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - VB_Coder - 11-04-13

السلام عليكم

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

- تحياتي .

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - حريف برمجة - 11-04-13

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

rs.Open "SELECT SUM(many) as total FROM tot where da=#" & Text2.Text & "#", cn, adOpenKeyset, adLockPessimistic

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - علوش - 11-04-13

اخواني ارفقت صورة الخطاء بعد تعديل الكود الى
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

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - VB_Coder - 11-04-13

أهلا ، قم بتغير السطر الملون بالأصفر اللي فيه الخطأ إلى هذا :

كود :
IF Not IsNull(rs!many) Then Label1.Caption = rs!many Else Label1.Caption = "0"

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

- تحياتي .

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - علوش - 11-04-13

اخوي vb_coder عافاك الله واشكرك على التفاعل معي ولاكن مازلت النشكلة لذلك ارفقت المثال للأطلع عليه
http://www.mediafire.com/?4ecdmcoh31vz95a

يا اخوان ارجو المساعدة في كود جمع جدول في قاعدة البيانات بتاريخ معين - VB_Coder - 11-04-13

أهلا , قاعدة البيانات 2007 والأوفيس اللي عندي 2003 ولم اتعامل من قبل مع قاعدة بيانات بتنسيق 2007 .