منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
استفسار حول طريقتي في قاعدة البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : استفسار حول طريقتي في قاعدة البيانات (/showthread.php?tid=17486)

استفسار حول طريقتي في قاعدة البيانات - صبري زينوبي - 29-09-16

السلام عليكم و رحمة الله و بركاته كيف حالكم...
أنا لاحظت طرق عديدة لربط قواعد البيانات بالفيجوال بازيك و كيفية استعمال SELECT ,UPDATE.DELETE و كلها مختلفة عن طريقتي التي تعلمتها حين دراستي فهل هي طريقة متميزة ام هناك ظرق اخرى افضل...
طريقتي هي اني انشأ كلاس و اضع فيه الكود التالي:
كود :
Imports MySql.Data.Types
Imports MySql.Data.MySqlClient


Imports System.Windows.Forms
Public Class class1
   Private mycon As mysqlconnection
   Private strcon As String
   Public rdr As MySqlDataReader
   Public Myreq, a, b As String
   Private cmd As MySqlCommand

   Public Sub Connecting_in_informatique()
       strcon = "server=localhost;user id=root;database=addetudiant;password=13061988"
       mycon = New MySqlConnection(strcon)
       mycon.Open()
       cmd = New MySqlCommand(Myreq, mycon)
       rdr = cmd.ExecuteReader
   End Sub
   Public Sub Disconnecting_in_informatique()
       rdr.Close()
       mycon.Close()
   End Sub
End Class
 
ثم حين اريد اضافة 
كود :
dim db_informatiqueas new class1
db_informatique.Myreq = "INSERT INTO table (t1, t2) values('"&t1.text&"','"&t2.text&"')
كود :
            db_informatique.Connecting_in_informatique()
كود :
            db_informatique.Disconnecting_in_informatique()

و حين استخراج البيانات استعمل
كود :
db_informatique.Myreq = "select*from etudiant "
           db_informatique.Connecting_in_informatique()
           Do While db_informatique.rdr.Read
           t1.Text = db_informatique.rdr(0).ToString
 t2.Text = db_informatique.rdr(1).ToString  
           Loop
           db_informatique.Disconnecting_in_informatique()
و نفس الطريقة مع الحذف و التعديل فأرجو منكم النصيحة هل هي طريقة محترفة ام علي بتغييرها و بارك الله فيكم