تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ما الحل ؟؟؟
#1
السلام  عليكم ورحمه الله وبركاته

ارجو الحل  


الداتا  جريد ما بتعرض محتويات الريبورت

والريبورت ما بعمل فلتر بين تاريخين

   

PHP كود :
   Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click

     
        Dim rep 
As New count
      rep
.SetDataSource(dt)

 
      

        Dim q 
As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] <1)")
 
       rep.SetParameterValue("m1"q)

 
       Dim w As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] <1)")
 
       rep.SetParameterValue("g1"w)

 
       Dim t As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] BETWEEN 1 AND 4)")
 
       rep.SetParameterValue("m2"t)

 
       Dim r As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] BETWEEN 1 AND 4)")
 
       rep.SetParameterValue("g2"r)

 
       Dim u As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] BETWEEN 5 AND 9)")
 
       rep.SetParameterValue("m3"u)

 
   Dim n As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] BETWEEN 5 AND 9)")
 
       rep.SetParameterValue("g3"n)

 
       Dim i As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] BETWEEN 10 AND 14)")
 
       rep.SetParameterValue("m4"i)

 
       Dim a As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] BETWEEN 10 AND 14)")
 
       rep.SetParameterValue("g4"a)

 
       Dim s As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] BETWEEN 15 AND 19)")
 
       rep.SetParameterValue("m5"s)

 
       Dim d As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] BETWEEN 15 AND 19)")
 
       rep.SetParameterValue("g5"d)

 
       Dim b As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='ذكر') AND ([age] >20)")
 
       rep.SetParameterValue("m6"b)

 
       Dim f As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([sex] ='انثى') AND ([age] >20)")
 
       rep.SetParameterValue("g6"f)


 
       Dim z As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='كلب') ")
 
       rep.SetParameterValue("dog"z)
 
       Dim x As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='جرذ') ")
 
       rep.SetParameterValue("rat"x)
 
       Dim c As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='حمار')")
 
       rep.SetParameterValue("donky"c)
 
       Dim m As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='ماعز')")
 
       rep.SetParameterValue("goat"m)
 
       Dim y As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='قط')")
 
       rep.SetParameterValue("cat"y)
 
       Dim ee As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([Type] ='اخرى') ")
 
       rep.SetParameterValue("ather"ee)



 
       Dim eqe As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([state] ='معروف') ")
 
       rep.SetParameterValue("know"eqe)
 
       Dim yw As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='الراس') ")
 
       rep.SetParameterValue("head"yw)
 
       Dim yew As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='الجذع') ")
 
       rep.SetParameterValue("j"yew)
 
       Dim yuw As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='ساق') ")
 
       rep.SetParameterValue("leg"yuw)
 
       Dim yyw As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='القدم') ")
 
       rep.SetParameterValue("foot"yyw)
 
       Dim ysw As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='اليد') ")
 
       rep.SetParameterValue("hand"ysw)
 
       Dim ynw As String SqlScalar("SELECT COUNT(*) FROM [Table1] WHERE ([place] ='اصبع اليد') ")
 
       rep.SetParameterValue("finger"ynw)

 
       rep.SetParameterValue("start_date"Me.DateTimePicker1.Value.Date)
 
       rep.SetParameterValue("end_date"Me.DateTimePicker2.Value.Date)
 
    
        CrystalReportViewer1
.ReportSource rep
        CrystalReportViewer1
.Refresh()

 
   End Sub 
الرد
تم الشكر بواسطة:
#2
طيب ننسى قصة انه يعرض ع الداتا جريد



خلونا يعرض بس ع الريبورت خلال فترتين
الرد
تم الشكر بواسطة:
#3
رررررررررررررررررررررررررررررفع
الرد
تم الشكر بواسطة:
#4
هذا الرابط سيفيد في توضيح مسألة البحث بين قيمتين سواء كانت رقمين أو نصين أو تاريخين
SQL BETWEEN Operator
الرد
تم الشكر بواسطة:
#5
الكود غير واضح ويبدو ان هناك اجراء ناقص اسمه SqlScalar
الرد
تم الشكر بواسطة:
#6
(06-05-17, 08:48 PM)mansoor كتب : هذا الرابط سيفيد في توضيح مسألة البحث بين قيمتين سواء كانت رقمين أو نصين أو تاريخين
SQL BETWEEN Operator
ما بزبط بحالة البراميتر

(06-05-17, 11:31 PM)mansoor كتب : الكود غير واضح ويبدو ان هناك اجراء ناقص اسمه SqlScalar


ممكن توضح اكثر ؟
الرد
تم الشكر بواسطة:
#7
الكود الموجود في الموضوع ناقص.
الرد
تم الشكر بواسطة:
#8
Smile

ايش ناقص ؟
الرد
تم الشكر بواسطة:
#9
شوف المسج

بعدد  البراميتر اعط المسج

   
الرد
تم الشكر بواسطة:
#10
انا وضعت اسم عمود تاريخ من عندي على سبيل المثال، فهل اسم العمود هو cdate فعلا؟
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار بخصوص اخذ نسخه احتياطيه(تم الحل)مشكور اخوانى (waw والاخ asemshahen5) خالد كامل1 18 1,046 07-09-21, 09:45 PM
آخر رد: waw
  البار كود المنتج لا يقراء من جهاز الباركود [تم الحل] Rabeea Qbaha 1 3,827 24-08-21, 07:10 PM
آخر رد: أبووسم
  طلب بسيط من احبتى فى الله المتميزين وسهل تم الحل عن طريق (ابو انس +mrfenix93) خالد كامل1 5 667 05-07-21, 09:21 PM
آخر رد: ابو انس
  كيف ازيد ارتفاع سطر في داتا جريد فيو-تم الحل بواسطة /ابوانس/ خالد20 2 318 25-06-21, 12:58 PM
آخر رد: خالد20
  [تم الحل] اضافة صورة لقاعدة البيانات اكسس anes 2 556 12-06-21, 02:16 AM
آخر رد: anes
  ما سبب هذا الخطأ وكيف يتم الحل؟ أبو عبدالله الحلواني 6 822 28-01-21, 08:12 AM
آخر رد: ZaerAllail
  قمت بعمل مثال لإستخراج النصوص من الصورة واجهتني مشكلة اللغة العربية ماهو الحل mohamedgadain61 1 610 17-01-21, 07:54 AM
آخر رد: ابراهيم ايبو
  [تم الحل]العمليات الحسابية في الداتا جريد فيو essawq 15 1,717 14-01-21, 12:34 AM
آخر رد: essawq
  [ تمّ الحل ] : الطباعة من خلال الريبورت فيور عبد العزيز البسكري 2 632 16-12-20, 04:03 AM
آخر رد: عبد العزيز البسكري
  استفسار واتمنى المساعدة في الحل وهج الصحراء 2 547 04-12-20, 11:43 AM
آخر رد: Anas Mahmoud

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


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