Dim conn As ADODB.Connection
Dim myTableRS As ADODB.Recordset
Set conn = New ADODB.Connection
Set myTableRS = New ADODB.Recordset
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Open "C:\mimfak_veri.mdb"
bu kodu modülde bağlantı veya yol adıyla tanımlayıp sadece ilgili yere bu kodu yazarak bağlantı kurulabilirmi.
![[Resim: 13323321301.jpg]](https://resim.accesstr.net/uploads/13323321301.jpg)