تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[نقاش] ارجو الرد على السؤال الفلترة والفرز
#1
Video 
السلام عليكم ورحمة الله وبركاته 
Private Sub Command8_Click()


On Error Resume Next

ConnectionDatabase
If RS_Data1.State = adStateOpen Then RS_Data1.Close

RS_Data1.Open "Select * From CASES Where [outcome]='" & Combo18.Text & "'", DB, adOpenStatic, adLockOptimistic

If RS_Data1.RecordCount > 1 Then
Set MSHFlexGrid1.DataSource = RS_Data1
Label1.Caption = RS_Data1.RecordCount
Else
Set MSHFlexGrid1.DataSource = RS_Data1
MSHFlexGrid1.Clear

Label1.Caption = RS_Data1.RecordCount

End If

If RS_Data1.State = adStateOpen Then RS_Data1.Close
If DB.State = adStateOpen Then DB.Close
end if

السؤال ؟


اريد مثلا فرز النتائج :

    الاسم      النتيجة
   احمد          سلبي
   عمر           ايجابي
  خالد       
   عامر     
   منير          سلبي

اذا فرزت الايجابي   او السلبي بيظهر 

لكن كيف افرز بدون نتائج وهي الفرغه مثل خالد و عامر    ...
الرد
تم الشكر بواسطة: جاسم عبد
#2
اضف شرط في جملة الاستعلام كالتالي :

لنفرض حقل النتيجة اسمه result


كود :
RS_Data1.Open "Select * From CASES Where [outcome]='" & Combo18.Text & "' and [result]<>'" & "" & "'", DB, adOpenStatic, adLockOptimistic
الرد
تم الشكر بواسطة: amer2000
#3
عذرا على التاخير 


شكرا اخ  [b]حريف برمجة[/b]


بخصوص الكود لم يقلح تماما   ... ارجو الرد من الاخوة شاكرا لكم...نرجو  التعديل في الكود او عمل فكره اخرى  للسؤال السابق,#1
الرد
تم الشكر بواسطة:
#4
مرحباً اخى amer2000

للبحث عن قيم فارغة كل مالعليك ان تجعل البحث بهذه الطريقة
كود :
SELECT * FROM Table WHERE Natiga is Null

طبعاً كل ما تحتاجه التركيز عليه هو 
كود :
WHERE Natiga is Null

بحيث العمود المطلوب البحث به بقيمة فارغة المقصود بها Natiga 
قم بتغيير اسمه لما لديك من مسمى فى قاعدة البيانات

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: amer2000 , Ahmed_Mansoor
#5
الف الف شكرا وبيض الله ووجهك وانار دربك
الرد
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اساتذتي الاحبة ارجو منكم المساعدة بنت الشام 2 248 07-10-18, 11:58 AM
آخر رد: بنت الشام
  [سؤال] الى الاخوة في المنتدى ارجو مساعدتي في هذا المشروع sher 2 280 08-09-18, 09:41 PM
آخر رد: جاسم عبد
  ارجو المساعدة في سكوال سيرفر عمور2016 11 589 15-04-18, 03:05 AM
آخر رد: عبد العزيز البسكري
  [كود] ارجو من الاخوة المساعدة في جمع الاعمدة عمور2016 4 243 19-02-18, 04:25 PM
آخر رد: عمور2016
  رسالة خطا ارجو المساعدة محمد حمد محمد 5 239 14-02-18, 12:48 AM
آخر رد: Ahmed_Mansoor
Sad [سؤال] ارجو من الشباب الشرح معنى الرسالة ؟ amer2000 4 509 08-05-17, 04:45 PM
آخر رد: mansoor
  [vb6.0] ارجو التعديل على مجموع الحسابين الموجود في المشروع عبدالقادرعواد 2 629 23-02-17, 01:35 AM
آخر رد: عبدالقادرعواد
  [vb6.0] ارجو المساعده في كود iAwadop 4 688 15-01-17, 02:48 PM
آخر رد: iAwadop
  سؤال حيرني في حلقة التكرار Do ارجو المساعده mohd_sader 1 650 10-12-16, 12:57 AM
آخر رد: Ahmed_Mansoor
Bug [vb6.0] ارجو المساعدة في حفظ وطباعة الصور من قاعدة البيانلت amer2000 4 1,011 21-11-16, 11:45 AM
آخر رد: amer2000

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم