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


في زر الإضافة نضع الكود التالي
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() 
الرد }}}
تم الشكر بواسطة: a_abdullah , a_abdullah
#3
(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() 

للاسف مارضى يشتغل الكود معي في الاضافة اخر صف مايتنفذ وفي الحذف الصف الاول مايتنفذ
الرد }}}
تم الشكر بواسطة:
#4
جرب الحفظ بالطريقة التالية
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 

اما الحذف سيتم حذف السطر المحدد فقط.
الرد }}}
تم الشكر بواسطة:
#5
(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 

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


بالمرفقات اضفت الخطأ اللي يطلع لي اذا سويت الرن  Huh


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

ممكن تشرح لي اكثر انا مبتدئة وطريقة الكود كيف فيه كود معين او ايش بالضبط ؟؟ Huh
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 80 24-03-24, 02:00 AM
آخر رد: خالد كامل1
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 598 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  استعلام select عن مجموعة بيانات Adel27213 1 172 15-03-24, 01:11 AM
آخر رد: justforit
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 2 164 05-03-24, 08:27 PM
آخر رد: مصمم هاوي
  [VB.NET] تحديث بيانات فى كلاس من جدول سيكوال asdfar1977 6 184 26-02-24, 01:07 AM
آخر رد: asdfar1977
  كيفية جمع أرقام عمود فى الداتا جريد فيو بناءاً على بيانات معينة heem1986 5 222 25-02-24, 11:26 PM
آخر رد: heem1986
  [C#.NET] طباعة بيانات داتا جرد فيو h2551996 0 83 25-02-24, 02:31 PM
آخر رد: h2551996
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 1 309 21-02-24, 11:44 PM
آخر رد: AHMED213
  كيفية انشاء سكريبت لقاعدة بيانات من خلال الكود heem1986 1 193 20-02-24, 12:00 AM
آخر رد: Kamil
  كيفية تنفيذ أمر عرض بيانات من فورم ثان مصمم هاوي 7 329 19-02-24, 12:28 AM
آخر رد: مصمم هاوي

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


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