[galas]

طريقة ملئ datagridview بقواعد البيانات الموجودة على السيرفر
استخدم هذه الدالة :

كود :

Public Sub Charger_DGV(cmd As String, tableau As String, dgv As DataGridView)
       Try
           If myConnection.State = ConnectionState.Closed Then
               myConnection.Open()
           End If
           ds = New DataSet 'vider ds
           da = New OleDbDataAdapter(cmd, myConnection)
           da.Fill(ds, tableau)
           dv = New DataView(ds.Tables(tableau))
           dgv.DataSource = Nothing
           dgv.Refresh()
           dgv.DataSource = dv
           myConnection.Close()
       Catch ex As Exception
           MsgBox("Charger_DGV()" & vbNewLine & ex.Message)
       End Try
   End Sub

مثال  على كيفية إستدعاء الدالة :

كود :

Charger_DGV("SELECT * FROM tbFonction ORDER BY Fonction", "Fonction", dgvFonction)

الدالة لها 3 عناصر :
الأول : الكويري : "SELECT * FROM tbFonction ORDER BY Fonction"
الثاني : إسم العمود في قاعدة البيانات : "Fonction"
الثالث : إسم داتاكريدفيو : dgvFonction

---

دعواتكم بالتوفيق

---

{ وَقُل رَّبِّ زِدْنِي عِلْمًا }

ساهم دائماً فى تقديم   لكل من يقوم بالمساهمة

فى حل اى مشكلة او استفسار لديك مع اضافة رد بشكره ودعوة له

فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله

---