(21-04-17, 12:50 PM)Adrees كتب : وعليكم السلام


في زر الإضافة نضع الكود التالي

PHP كود :

       Dim tb = New Order
        tb.OrderID = OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn1").Value
        tb.CustomerID = OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn2").Value
        tb.DateOrdered = CDate(OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn3").Value)
        tb.DateRequired = CDate(OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn4").Value)
        tb.Status = OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn5").Value
        obj.Orders.InsertOnSubmit(tb)
        obj.SubmitChanges() 


وفي زر الحذف نضع الكود التالي

PHP كود :

       Dim tb = (From s In obj.Orders Where s.OrderID = OrderDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn1").Value Select s).SingleOrDefault
        obj.Orders.DeleteOnSubmit(tb)
        obj.SubmitChanges() 


(21-04-17, 03:31 PM)Adrees كتب : جرب الحفظ بالطريقة التالية

PHP كود :

       For i As Integer = 0 To OrderDataGridView.Rows.Count - 1
            Dim tb = New Order
            tb.OrderID = OrderDataGridView.Rows(i).Cells("DataGridViewTextBoxColumn1").Value
            tb.CustomerID = OrderDataGridView.Rows(i).Cells("DataGridViewTextBoxColumn2").Value
            tb.DateOrdered = CDate(OrderDataGridView.Rows(i).Cells("DataGridViewTextBoxColumn3").Value)
            tb.DateRequired = CDate(OrderDataGridView.Rows(i).Cells("DataGridViewTextBoxColumn4").Value)
            tb.Status = OrderDataGridView.Rows(i).Cells("DataGridViewTextBoxColumn5").Value
            obj.Orders.InsertOnSubmit(tb)
            obj.SubmitChanges()

        Next 


اما الحذف سيتم حذف السطر المحدد فقط.

(21-04-17, 05:26 PM)حريف برمجة كتب : الافضل اجراء العمليات (الحفظ والتعديل والحذف والاستعلام) بالكود
طريقة المعالج محصورة ولايمكن التعامل معها بحرية مثل الكود .