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

نسخة كاملة : جلب اجمالى المبيعات فى جدول معين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم 

لدى جدول wardya_cashier  به الكثير من المبيعات  
اريد جلب اجمالى قيمة المببعات بناء على الشرط داخل textbox1
حيث ان  textbox1 قد يساوى فاتورة تيك واى  او يساوى فاتورة دليفرى اريد جلب اجمالى القيمة داخل textbox2

[attachment=28054]
Dim da As New SqlDataAdapter
dt_store.Clear()
da = New SqlDataAdapter("select * from اسم الجدول المطلوب where order_type = '" & textbox1.Text & "'", Con)
da.Fill(dt_store)
'dgv.DataSource = dt_Customer_Tbl
'لجمع عمود فى datatable

Dim sum As Double
For i As Integer = 0 To dt_store.Rows.Count - 1
sum = dt_store.Rows(i).Item("order_total") + sum
Next
textbox2.Text = sum
(06-08-22, 10:29 AM)Lathe1 كتب : [ -> ]Dim da As New SqlDataAdapter
       dt_store.Clear()
       da = New SqlDataAdapter("select * from اسم الجدول المطلوب where order_type = '" & textbox1.Text & "'", Con)
       da.Fill(dt_store)
       'dgv.DataSource = dt_Customer_Tbl
       'لجمع عمود فى datatable

       Dim sum As Double
       For i As Integer = 0 To dt_store.Rows.Count - 1
           sum = dt_store.Rows(i).Item("order_total") + sum
       Next
       textbox2.Text = sum

اخى وحبيبى الف شكر ليك ولكنى لا افهم المسميات لديك
كما انه ليس لدى داتا جريد فيو ولن استخدمها 
انا اريد جلب الاجمالى داخل تيكست بوكس فقط كما بالصورة
[attachment=28060 كتب :حماده ممدوح البحيرى pid='184168' dateline='1659808864']
(06-08-22, 10:29 AM)Lathe1 كتب : [ -> ]Dim da As New SqlDataAdapter
       dt_store.Clear()
       da = New SqlDataAdapter("select * from اسم الجدول المطلوب where order_type = '" & textbox1.Text & "'", Con)
       da.Fill(dt_store)
       'dgv.DataSource = dt_Customer_Tbl
       'لجمع عمود فى datatable

       Dim sum As Double
       For i As Integer = 0 To dt_store.Rows.Count - 1
           sum = dt_store.Rows(i).Item("order_total") + sum
       Next
       textbox2.Text = sum

اخى وحبيبى الف شكر ليك ولكنى لا افهم المسميات لديك
كما انه ليس لدى داتا جريد فيو ولن استخدمها 
انا اريد جلب الاجمالى داخل تيكست بوكس فقط كما بالصورة
اولا عندك خطا بسيط يجب عليك عمل نوع الفاتورة من نوع رقمي مثال جدول انواع الفواتير :
1- بالصالة المطعم .
2- بالصالة العاءلات .
3- ديلفري .
وهذه الارقام هي ماتوضع في جدولك الذي وضعت صورته .
اما بالنسبة لما طلبت :

PHP كود :
Select sum(order_totalfrom TableName where order_type 
رقم واحد يدل على نوع الفاتورة .
اي صالة المطعم و هكذا .
والباقي اصبح سهلا باذن الله .
(08-08-22, 01:08 PM)asemshahen5 كتب : [ -> ]اولا عندك خطا بسيط يجب عليك عمل نوع الفاتورة من نوع رقمي مثال جدول انواع الفواتير :
1- بالصالة المطعم .
2- بالصالة العاءلات .
3- ديلفري .
وهذه الارقام هي ماتوضع في جدولك الذي وضعت صورته .
اما بالنسبة لما طلبت :

PHP كود :
Select sum(order_totalfrom TableName where order_type 
رقم واحد يدل على نوع الفاتورة .
اي صالة المطعم و هكذا .
والباقي اصبح سهلا باذن الله .


اى باقى اخى الكريم
 ارجوا كتابة الكود كاملا جزاك الله خيرا
كود :
Dim CodeOrderType As String = Me.TextBox1.Text
   Dim Sql As String = "SELECT IIF(SUM(Order_Total) Is Null,0,SUM(Order_Total)) As SumOrders From Table Where Order_Type = '" & CodeOrderType & "'"
   Dim Cmd As SqlCommand = New SqlCommand(Sql, Conne)
   Dim DA As SqlDataAdapter = New SqlDataAdapter(Cmd)
   Dim DT As DataTable = New DataTable
   DA.Fill(DT)
   Me.TextBox2.Text = DT.Rows(0)(0).ToString