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

اريد ان لما يكون يكون نفس المنتج لا يتكرر على الداتاقريد بارك الله فيكم
الرد
تم الشكر بواسطة:
#2
http://vb4arb.com/vb/showthread.php?tid=25363
http://vb4arb.com/vb/showthread.php?tid=26442
الرد
تم الشكر بواسطة: asemshahen5 , العيدروس , العيدروس
#3
شكرا اخي الفايز جربت البحث و محاولة ايجاد الحل و ما وصلت صديقي
الرد
تم الشكر بواسطة: asemshahen5
#4
PHP كود :
       For i 0 To Dgv.Rows.Count 1
            If Dgv
.Rows(i).Cells(2).Value cmb_ProdectName.Text Then
                Dgv
.Rows(i).Cells(4).Value += 1
                Return
            End 
If
 
       Next
        Dgv
.Rows.Add(Txt_InvNum.TextTxt_Codeprodect.Textcmb_ProdectName.TextTxt_UnitPrice.TextTxt_Qtn.TextTxt_SubTotal.Text
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر




الرد
تم الشكر بواسطة: العيدروس
#5
شكرا استاذ asemshahen و بارك الله فيك نقلت الكود و نسخته بالملف لكن لم تقوم بالعملية و مازال المنتجات تظهر تحت بعضها
الرد
تم الشكر بواسطة: asemshahen5
#6
الجدول Tableposdetails
لازم تغير نوع uniteprice الى رقم مزدوج Double
ولازم تغير نوع SubTotal الى رقم مزدوج Double

PHP كود :
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Try


            Cn
.Open()
 
           Cmd = New OleDbCommand("Update Tableposdetails Set Qty=Qty+@Qty , SubTotal=SubTotal+@SubTotal Where codeproduct=@codeproduct And InvoiceNo=@InvoiceNo"Cn)
 
           With Cmd.Parameters
                
.AddWithValue("@Qty"Me.TextBox4.Text)
 
               .AddWithValue("@SubTotal"Me.TextBox8.Text)
 
               .AddWithValue("@codeproduct"Me.TextBox1.Text)
 
               .AddWithValue("@InvoiceNo"Me.TextBox5.Text)
 
           End With
            If Cmd
.ExecuteNonQuery() = 0 Then
                Cmd 
= New OleDbCommand("Insert into Tableposdetails ( InvoiceNo , codeproduct , nameproduct , uniteprice , Qty , SubTotal) Values ( @InvoiceNo , @codeproduct , @nameproduct , @uniteprice , @Qty , @SubTotal)"Cn)
 
               With Cmd.Parameters
                    
.AddWithValue("@InvoiceNo"Me.TextBox5.Text)
 
                   .AddWithValue("@codeproduct"Me.TextBox1.Text)
 
                   .AddWithValue("@nameproduct"Me.TextBox2.Text)
 
                   .AddWithValue("@uniteprice"Me.TextBox3.Text)
 
                   .AddWithValue("@Qty"Me.TextBox4.Text)
 
                   .AddWithValue("@SubTotal"Me.TextBox8.Text)
 
               End With
                Cmd
.ExecuteNonQuery()
 
           End If
 
           Cn.Close()

 
           loadrecord()

 
           Pid ""

 
           Call Update_Tablepos()

 
           Me.TextBox1.Text String.Empty
 
           Me.TextBox2.Text String.Empty
 
           Me.TextBox3.Text String.Empty
 
           Me.TextBox4.Text String.Empty


 
       Catch ex As Exception
            Cn
.Close()
 
           MsgBox(ex.MessagevbCritical)
 
       End Try
 
   End Sub 
الرد
تم الشكر بواسطة: العيدروس , asemshahen5
#7
تمام بارك الله اخي و جزاك الله خيرا
الرد
تم الشكر بواسطة: asemshahen5


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Smile تحديد الكل في الداتاقريد فيو عمور2016 7 639 23-10-20, 03:54 AM
آخر رد: عمور2016
  التعديل على عمود في الداتاقريد فيو دفعة واحد بناء على قيمة معينة جيولوجي مبتدئ 3 637 02-08-20, 02:10 AM
آخر رد: ابراهيم ايبو
  التعديل على عمود في الداتاقريد فيو دفعة واحد بناء على قيمة معينة جيولوجي مبتدئ 0 377 01-08-20, 07:49 PM
آخر رد: جيولوجي مبتدئ
  كيف يتم وضع subtotal في الداتاقريد فيو ahmedfa71 4 605 08-07-20, 04:47 PM
آخر رد: ahmedfa71
  تحديث عمود واحد فقط في الداتاقريد فيو وتخزين البيانات في sql جيولوجي مبتدئ 3 721 18-06-20, 11:00 AM
آخر رد: جيولوجي مبتدئ
  [VB.NET] كليك يمين على صف في الداتاقريد و حذف السطر larbihamri 9 1,071 17-06-20, 01:19 AM
آخر رد: larbihamri
  حذف صف من الداتاقريد فيو وقاعدة البيانات جيولوجي مبتدئ 2 502 11-05-20, 03:26 AM
آخر رد: جيولوجي مبتدئ
  جمع الوقت الموجود في عمود في الداتاقريد فيو جيولوجي مبتدئ 7 904 24-04-20, 07:56 AM
آخر رد: جيولوجي مبتدئ
  افضل طريقة لمعرفة افضل المنتجات مبيعا mostafa nada 6 806 16-03-20, 03:29 AM
آخر رد: mostafa nada
  [سؤال] حذف القيم المكررة muad 6 837 29-01-20, 10:48 PM
آخر رد: alsalamoni

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


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