تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تحديث البيانات بقاعدة البيانات
#1
اريد تحديث بيانات جدولين مرتبطين مع بعض علاقة راس براس حيث الجدول الاول الاساسي tb1  والثاني tb2

استخدمت الكود التالي بعد استعادة خلايا الداتا جريد الي التيكست لتحديث البيانات ولكن لم يحدث شيء ولم يحدث البيانات


كود :
con.Open()
       Dim Sav As New OleDb.OleDbCommand
       Sav.Connection = con
       Sav.CommandType = CommandType.Text
       Sav.CommandText = "UPDATE tb1,tb2 SET tb1.clien_mail = '" & _
       TextBox2.Text & "' , tb1.model_mail = '" & _
        TextBox3.Text & "' , tb2.probl_acce = '" & _
       TextBox4.Text & "' , tb2.main_acce= '" & _
       TextBox5.Text & "' ,tb2.typ_acce = '" & _
      TextBox6.Text & "' where tb1.ID_mail = tb2.ID_acce '" & _
        Label2.Text & "'"
       Sav.ExecuteNonQuery()
       Dim DataAdapter As New OleDbDataAdapter("SELECT tb1.ID_mail ,tb1.clien_mail, tb1.model_mail, tb2.probl_acce,tb2.main_acce,tb2.typ_acce  FROM tb1, tb2 where tb1.ID_mail = tb2.ID_acce", con)
       DataSet1.Clear()
       DataAdapter.Fill(DataSet1, "tb1,tb2")
       DataGridView1.Refresh()
       count()
       If con.State = ConnectionState.Open Then
           con.Close()
       End If
       MsgBox("تم الاضافه والحفظ بنجاح")
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم أخي العزيز ورحمة الله وبركاته
من الواضح أنك تريد التعديل أو التحديث على جدولين في آن معا، ولكن أخي العزيز لا يمكن التعديل على جدولين في جملة استعلام واحدة، لا بد من عملة جملة استعلام Update لكل جدول على حدى
- Update tb1 Set Field ....
- Update tb2 Set Field ....

أو يمكنك التحديث على جدولين من خلال هذه الطريقة :
لنفترض أن لدينا جدولان الأول بعنوان Employee  والثاني بعنوان Salary :


الجدول الأول يضم الحقول التالية :
- EmployeeId
- EmployeeName

الجدول الثاني يضم الحقول التالية ك
- EmployeeId
- SalaryId
- EntryDate
- Amount

للتعديل على الجدولين في آن معا يمكننا استخدام جملة الإستعلام التالية :
PHP كود :
Update Employee 
INNER JOIN Salary 
ON Employee
.EmployeeId Salary.EmployeeId
Set Employee
.EmployeeName Value,Salary.EntryDate Value,Salary.Amount Value
Where Employee
.EmployeeId 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 600 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  [VB.NET] تحديث بيانات فى كلاس من جدول سيكوال asdfar1977 6 184 26-02-24, 01:07 AM
آخر رد: asdfar1977
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 273 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  [كود] اريد كود إرسال البيانات من الفيجوال بيسك إلىPDF issamsaidd 10 5,829 25-12-23, 06:30 PM
آخر رد: الحزين اليماني
  جملة الاتصال بقاعدة البيانات اكسس محمد خيري 4 364 12-12-23, 03:14 AM
آخر رد: محمد خيري
  كود الاتصال بقاعدة البيانات sqlserver strongriseman 2 421 29-11-23, 09:25 PM
آخر رد: العتيق

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


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