كيف أعرض حقول الجدول في Datagrid عن طريق الكود

يا أخزان المقصد هو الربط عن طريق إستخدام الريفرنس Referrence

و ليس عن طريق الكنترول ADO

آسف أقصد يا أخوان بس الحرفين جنب بعضهم

أقصد أخوان آسف

بس الحرفين جنب بعض

مافي أحد يرجو المساعدة

جر بالتالي :

Dim rs As ADODB.Recordset 
Dim cn As ADODB.Connection

Private Sub Command1_Click() 
  Dim Sql As String

   Sql = "SELECT * FROM table_name"
   If rs.State = 1 Then rs.Close
   Rs.Open Sql , cn, adOpenKeyset, adLockOptimistic  

   Set dgrid.DataSource = rs 

End Sub

Private Sub Form_Load() 
  Set rs = New ADODB.Recordset 
  Set cn = New ADODB.Connection 

  cn.Open "provider=microsoft.jet.oledb.4.0;data source=C:\2000db.mdb;" 
End Sub

تحياتي

B)

ألف شكر لك أخي العزيز

ألف شكر