السلام عليكم أحبابي
ممكن مساعدة بسيطة لكود ربط قاعدة بيانات الأكسس بالفيجول من خلال أداة OpenFileDialog
لدي هذا كود الإتصال في مكان التعريفات بأعلى الأكواد
ممكن مساعدة بسيطة لكود ربط قاعدة بيانات الأكسس بالفيجول من خلال أداة OpenFileDialog
لدي هذا كود الإتصال في مكان التعريفات بأعلى الأكواد
Dim con As New OleDbConnection("provider=Microsoft.Ace.OLEDB.12.0;" & "data source=" & Application.StartupPath & "\ABC.accdb")
ولدي كود فتح OpenFileDialog
OpenFileDialog1.Filter = "TEXT FILE | *.accdb"
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
TextBox23.Text = OpenFileDialog1.FileName
End If
كيف أدمج الكودين ليتم إختيار قاعدة البيانات من الكمبيوتر لدي
أقصد أني لا أريد أن تكون قاعدة البيانات ثابتة في مكان معين