كووود ربط للفيجول بيسك

سلام عليكم

اخي الكريم : هناك عده مصادر للإجابة عن سؤالك

1- تجدها في الكتب ( مجانية وباللغه العربية ) في المنتدى تجدها وفي الصفحه الاولى .

2- في المنتدى يوجد مواضيع كثيره تتحدث في هذا المجال.

ارجو البحث قبل طرح السؤال واذا صعب عليك اي شيء لا تتردد في السؤال وانا تحت امرك .

أول شئ أشكر لك ردك

ثااااني شئ أنا سويت بحث

قبل لا أكتب الموضوع

و ما لقيت أو يمكن أنا ما ضبطت

طريقة البحث فأكون شااااكرة لو تتكرم

و تبحث و تحط لي و لغيري كثير روابط المواضيع :)

هذا هو كود الربط والمثال مرفق

لداتا بيز من نوع Access

طبعا انا سويت ربط بالكود

وسويت عملية اضافة بالكود

وبعد عرض البيانات بداتا جريد

وهو مثال سابق عندي

شوفيه ونفذيه

وبالتوفيق

هذا كود الربط والعرض بالداتاجريد

 Try
            Dim c As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Customer.mdb"
            Dim con As New OleDb.OleDbConnection(c)
            Dim data As New DataSet()
            con.Open()
            Dim adapt As New OleDb.OleDbDataAdapter("select * from customertable", con)
            adapt.Fill(data, "RR")
            DataGrid1.SetDataBinding(data, "RR")
            con.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

طبعا الداتا بيز اسمها Customer.mdb

خزنيها في مجلد bin

لاتنسين:)

وهذا كود

الاضافة ...

 Try
            Dim s As String = "insert into customertable values(" & TextBox2.Text & ",'" & TextBox1.Text & "','" & TextBox3.Text & "'," & TextBox4.Text & ")"
            Dim c As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Customer.mdb"
            Dim con As New OleDb.OleDbConnection(c)
            con.Open()
            Dim adapt As New OleDb.OleDbDataAdapter(s, con)
            Dim data As New DataSet()
            adapt.Fill(data, "RR")
            con.Close()

            con.Open()
            adapt = New OleDb.OleDbDataAdapter("select * from customertable", con)
            adapt.Fill(data, "RR")
            DataGrid1.SetDataBinding(data, "RR")
            con.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

والسلام وهذا المرفق

Access.zip