سلسلة تعلم الفيجوال بيزك VB.NET من الصفر حتى الاحتراف

سلسلة تعلم الفيجوال بيزك VB.NET من الصفر حتى الاحتراف مع برمجة ربط قواعد البيانات والشرح بالصور مع لامثلة

الدرس الاول:

تعريف جملة الاتصال بقاعدة البيانات:

 

Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ali.mdb;Jet OLEDB:Database Password=1234")

في هذا المثال :

اسم قاعدة البيانات ali.mdb

والرقم السري لقاعدة البيانات 1234

تكتب جملة الاتصال هذه في الجنيرال للكلاس

اضافة محتويات في قاعدة البيانات:

Try

   Dim str As String = String.Format("insert into TableMain (ItemNameMain, ItemNumber) Values ('{0}','{1}')", TxtItemName.Text, TxtItemNumber.Text)

            Dim cmd As New OleDbCommand(Str)

            cmd.Connection = con

            con.Open()

            cmd.ExecuteNonQuery()

            con.Close()

            MessageBox.Show("تم ادخال الاسم والرقم بنجاح")

            TxtItemName.Text = String.Empty

            TxtItemNumber.Text = String.Empty

Catch ex As Exception

MessageBox.Show(ex.Message)

End Try

يكتب هذا الكود في زر حيث يتم تنفيذه بعد ملأ البيانات ليتم ادخالها في قاعدة البيانات

انتقل الى الدرس الثاني لتكملة السلسلة