المواضيع

Post Top Ad

Your Ad Spot

الثلاثاء، 21 يوليو 2020

سلسلة تعلم الفيجوال بيزك 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


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



هناك تعليق واحد:

Post Top Ad

Your Ad Spot

الاقسام