تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] شباب هل من طريقة لتحديث البيانات بعد حفظها او العديل او الحذف
#1
بسم الله الررحمن الرحيم

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

هذا الكود لمربعات النص
كود :
Private Sub Load_orders_Data()
        Try
            Dim sql As String = "SELECT * FROM [car1] "
            If Con.State = 0 Then Con.Open()
            Using olecmd As New OleDbCommand(sql, Con)
                Using dr As OleDbDataReader = olecmd.ExecuteReader
                    orders_Table.Clear()
                    orders_Table.Load(dr)
                End Using
            End Using
            DataGridView1.AutoGenerateColumns = True   ' تعبئة الجريد مع  البندنج
            Me.bindingt.DataSource = orders_Table
            BindingNavigator1.BindingSource = bindingt

            txtid.DataBindings.Add(New Binding("Text", bindingt, "carID"))
            ComboBox1.DataBindings.Add(New Binding("Text", bindingt, "cusName"))
            txtdri.DataBindings.Add(New Binding("Text", bindingt, "dri"))
            txtdat.DataBindings.Add(New Binding("text", bindingt, "ass"))
            ComboBox2.DataBindings.Add(New Binding("Text", bindingt, "carName"))
            txtCnum.DataBindings.Add(New Binding("text", bindingt, "caNum"))
            txtkind.DataBindings.Add(New Binding("text", bindingt, "kind"))
            txtCq.DataBindings.Add(New Binding("Text", bindingt, "qun"))
            txtprice.DataBindings.Add(New Binding("text", bindingt, "price"))
            txttotal.DataBindings.Add(New Binding("text", bindingt, "total"))

            Load_orders_Data2()

          
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try




    End Sub

وهذا الكود لل datagrid

PHP كود :
Private Sub load_details_data(ByVal orderid As String)
        Try
            
Dim sql1 As String "SELECT carID2, ahda, monName, price, paky, date1 FROM car2 WHERE (carID2 = @oid)"
            
If Con.State 0 Then Con.Open()
            
Using olecmd1 As New OleDbCommand(sql1Con)
                
olecmd1.Parameters.AddWithValue("@oid"orderid)

                
Using dr1 As OleDbDataReader olecmd1.ExecuteReader
                    details_Table
.Clear()
                    
details_Table.Load(dr1)
                    
DataGridView1.AutoGenerateColumns True
                    DataGridView1
.DataSource details_Table

                    DataGridView1
.Columns(0).Visible False
                    DataGridView1
.Columns(1).Visible False
                    DataGridView1
.Columns(2).Visible True
                    DataGridView1
.Columns(3).Visible True
                    DataGridView1
.Columns(4).Visible True
                    DataGridView1
.Columns(5).Visible True
                    
'''''''''''''''''''''

                    DataGridView1.Columns(2).Width = 140
                    DataGridView1.Columns(3).Width = 120
                    DataGridView1.Columns(4).Width = 140
                    DataGridView1.Columns(5).Width = 140
                    ''''''''''''''''''''''''''''''''''''''''''''''''
                    DataGridView1.Columns(2).HeaderText = "المنصرف"
                    DataGridView1.Columns(3).HeaderText = "المبلغ"
                    DataGridView1.Columns(4).HeaderText = "الباقى"
                    DataGridView1.Columns(5).HeaderText = "التاريخ"
                    '''''''''''''''''
                    
DataGridView1.ColumnHeadersDefaultCellStyle.Alignment DataGridViewContentAlignment.MiddleCenter
                    DataGridView1
.MultiSelect False
                    With Me
.DataGridView1
                        
.RowsDefaultCellStyle.BackColor Color.White
                        
.AlternatingRowsDefaultCellStyle.BackColor Color.White
                        
.RowsDefaultCellStyle.ForeColor Color.Black
                        
.AlternatingRowsDefaultCellStyle.ForeColor Color.Black
                    End With


                End Using
            End Using
        
Catch ex As Exception
            MsgBox
(ex.Message)

        
End Try
    
End Sub 

هذه طريقة الداتا بيندينج
مع العلم انى استخدم sql server
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}
تم الشكر بواسطة:
#2
حاول تستخدم SqlDataAdapter Class & DataSet Class متهيألي ستجد الحل في ذلك
الرد }}}
تم الشكر بواسطة:
#3
المثال مرفق

الاوامر الاخيرة لم اضفها 


الملفات المرفقة
.zip   For_A7med.zip (الحجم : 58.32 ك ب / التحميلات : 107)
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اختصار كود الجمع داخل شبكة البيانات محمد خيري 2 140 25-04-24, 03:30 PM
آخر رد: محمد خيري
  [VB.NET] طريقة استدعاء مكتبة dll عبد الناصر موسى 3 1,503 10-04-24, 04:33 AM
آخر رد: emadahmed1995
  [VB.NET] طريقة التعلم بخطوات صحيحة للتعلم و المعرفة انمار الرواي 0 79 31-03-24, 08:23 PM
آخر رد: انمار الرواي
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 252 04-03-24, 07:15 AM
آخر رد: new_programer
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 224 25-02-24, 06:29 AM
آخر رد: loay775
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 293 11-02-24, 08:43 PM
آخر رد: assuhimi
  طريقة اجراء نسخة احتياطية و استرجاعها ؟ Osama NY 2 499 07-02-24, 08:59 PM
آخر رد: Kamil
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 336 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 677 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 314 18-01-24, 05:04 PM
آخر رد: loay775

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


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