[أحمد النجار]

ممكن تسوي متغير في settings الخاصة بالبرنامج

وليكن اسمه Con

ثم قم بالتالي عند تحديد قاعدة البيانات

كود :

My.settings.conn = "Provider = MicroSoft.Jet.Oledb.4.0; Data Source = " & ofd.FileName
my.settings.save

وعند استدعاء الاتصال اكتب التالي

كود :

Dim cs As New OleDbConnection(My.settings.conn)