منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : أريد حفظ البيانات بعد تحديثها
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم و رحمة الله و بركاته

معى مثال مرفق لقاعدة بيانات .mdb يتم عرض الجدول الذى بداخلها فى  الأداة datagridview1 
 و المشكلة أنه عند تغيير البيانات بالكتابة من خلال ال datagrid لا يتم التحديث للبيانات و لا أعرف ما هو الحل؟
مع العلم أننى أستخدم  فيجوال استوديو 2015

و كان قد رد على الأخ سعود على نفس السؤال من يومين تقريبا و لكنى أردت أن أعرض المثال للتوضيح.

فى انتظار الرد و السلام عليكم
PHP كود :
Imports System.Data.OleDb
Public Class Form1
    
'افضل كود معرفة مسار البرنامج
    Dim appfolder As String = IO.Path.GetDirectoryName(Application.ExecutablePath)
    Dim Conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & appfolder & "\Test.mdb")
    Dim DS As New DataSet
    Dim DA As New OleDbDataAdapter
    Dim cmd As OleDbCommandBuilder
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
        DS = New DataSet
        DA = New OleDbDataAdapter("SELECT * FROM tbl_Test", Conn)
        cmd = New OleDbCommandBuilder(DA)
        DA.Fill(DS, "tbl_Test")
        DataGridView1.DataSource = DS.Tables("tbl_Test")
    End Sub
    Private Sub cmdUpdate_Click(sender As Object, e As EventArgs) Handles cmdUpdate.Click
        DA.Update(DS, "tbl_Test")
    End Sub
End Class 

قارن بين الكود هذا واللذي لديك لتعرف الفرق
كود :
Dim c As New OleDbCommandBuilder(DA)
DA.Update(DS, "tbl_Test")
لقد عمل الكود بنجاح

جزاكم الله خيرا

و لكن عند تنفيذ نفس الكود على sql database لقاعدة بيانات خارجية remote access database لا يعمل و بيجيب نفس الخطأ !