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

ساعدني احد الاخوة بكود الاضافة ويعمل ولكن يجب غلق البرنامج واعادة فتحة مرة اخري لظهور البيانات الجديدة  اريد كود التحديث والحفظ

كود الاضافة



           Using con As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\database1.accdb;Jet OLEDBBig Grinatabase Password=12345")
               Using cmd As New OleDbCommand("insert into web_tb (name_web,type_web,url_web) values(@name_web,@type_web,@url_web)", con)
                   cmd.Parameters.AddWithValue("@name_web", ("alie"))
                   cmd.Parameters.AddWithValue("@type_web", ("ebrahim"))
                   cmd.Parameters.AddWithValue("@url_web", ("goda"))
                   'فحص الاتصال بقاعدة البيانات
                   If con.State = ConnectionState.Open Then
                       con.Close()
                   End If
                   con.Open()
                   cmd.ExecuteNonQuery()
                   con.Close()
               End Using
           End Using
      



اضفت الكود التالي لعمل حفظ ولكن وجودة مثل عدمة لايفعل شيء


PHP كود :
 DataGridView1.Refresh()
 
       BindingSource1.EndEdit()
 
       DataAdapter1.Update(DataSet1"web_tb"

دة كود ملاء البيانات لظهور بالداتا جريد


كود :
  Dim Table1 As OleDbCommand = New OleDbCommand(" SELECT  * from web_tb ", con)
           DataAdapter1 = New OleDbDataAdapter(Table1)
           Dim builder As New OleDbCommandBuilder(DataAdapter1)

           DataSet1 = New DataSet()
           DataAdapter1.Fill(DataSet1, "web_tb")

           BindingSource1 = New BindingSource(DataSet1, "web_tb")

           BindingSource2 = New BindingSource(DataSet1, "web_tb")


اريد كود لعمل ريفريش ويعيد البيانات بعد التغير من عملية الاضافة
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ،،

يجب عليك وضع كود ملء الداتا قريد في حدث فورم لود لإظهار البيانات في الداتا قريد وبعد كود الحفظ أيضاً .
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في تصدير الداتا الى PDF alshandodi 0 4 منذ 1 ساعه مضت
آخر رد: alshandodi
  استدعاء بيانات العميل الى جدول الفاتورة mostafa nada 8 160 أمس, 11:54 AM
آخر رد: asemshahen5
  [VB.NET] رفع قاعدة بيانات علي جوجل دريف والاتصال بها من أكثر من جهاز محمد صلاح ابراهيم 4 360 17-02-19, 02:31 PM
آخر رد: sendbad100
  ارجو المساعدة مشروع عن الوزن المثالي Rodi001 7 7,028 13-02-19, 01:08 AM
آخر رد: مها القويفلي
  سؤال فى صفوف الداتا جريد فيو احمد خطاب 1 76 07-02-19, 03:51 AM
آخر رد: حريف برمجة
  عرض بيانات في الليست فيو Emam emam 5 148 01-02-19, 11:13 PM
آخر رد: asemshahen5
  مطلوب عرض تفاصيل بيانات داخل Texbox عن طريق ListView ... احتاج كود استعلام mohamedgadain61 9 273 30-01-19, 06:42 AM
آخر رد: حريف برمجة
  المساعدة في حل مشكلة الترقيم التسلسلي في الكريستال ريبورت ( حاجة غريبة حصلت معي ) جيولوجي مبتدئ 2 126 27-01-19, 12:09 PM
آخر رد: جيولوجي مبتدئ
  [VB.NET] مشكلة في تصدير بيانات الى إكسيل محمد بوقزاحة 3 134 26-01-19, 11:29 PM
آخر رد: محمد بوقزاحة
  [VB.NET] تصدير بيانات من DGV الى ملف اكسيل محمد بوقزاحة 1 95 24-01-19, 03:52 PM
آخر رد: sendbad100

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


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