السلام عليكم
أصدقائي كتب الكود التالي ووضعته في الكلاس
أصدقائي كتب الكود التالي ووضعته في الكلاس
Imports System.Data.OleDb
Public Class DBConnect
' Public Con As New OleDbConnection("provider=Microsoft.ACE.OLEDB.12.0;Data source = |DataDirectory|\stordb.accdb")
Public ds As DataSet
Public da As OleDbDataAdapter
Public dv As DataView
Public Cmd As OleDbCommand
Public sql As String
Sub FillDataSet(sql As String, TableName As String)
ds = New DataSet
da = New OleDbDataAdapter(sql, Con)
da.Fill(ds, TableName)
dv = New DataView(ds.Tables(TableName))
End Sub
End Class
والكود التالي في الفورمPublic Class Form1
Dim MyConnect As DBConnect
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
MyConnect.FillDataSet("SELECT * FROM Store", "Store")
DataGridView1.DataSource = MyConnect.dv
End Sub
End Class
الكود في الأصل كان يتعامل مع قواعد البيانات من نوع سكول ولاكن عدلته ليتعامل مع قواعد البيانات أكسس ولاكن يظهر لي خطأ لم أعرف سببه وهذا محتواهAn unhandled exception of type 'System.NullReferenceException' occurred in WindowsApplication19.exe
Additional information: Object reference not set to an instance of an object.
أرجو المساعدة لو سمحتم