السلام عليكم
رمضان كريم
انا جديد في عالم البرمحة بفيجوال بيسك
لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات
عند اصافة data source يكون الاتصال عادي
اما عند وصع الكود التالي لا تتصل
Imports System.Data.OleDb
Public Class Form1
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\vb\add\add.mdb")
Dim da As New OleDbDataAdapter
Dim dt As New DataTable
Sub table_load()
da = New OleDbDataAdapter("select * from table", add)
da.Fill(dt)
DataGridView1.DataSource = dt
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
table_load()
End Sub
End Class
بارك الله فيكم
رمضان كريم
انا جديد في عالم البرمحة بفيجوال بيسك
لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات
عند اصافة data source يكون الاتصال عادي
اما عند وصع الكود التالي لا تتصل
Imports System.Data.OleDb
Public Class Form1
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\vb\add\add.mdb")
Dim da As New OleDbDataAdapter
Dim dt As New DataTable
Sub table_load()
da = New OleDbDataAdapter("select * from table", add)
da.Fill(dt)
DataGridView1.DataSource = dt
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
table_load()
End Sub
End Class
بارك الله فيكم