Get

Imports Microsoft.VisualBasic
Imports DL_DatasetTableAdapters


Public Class BL_Product


Private _productsAdapter As ProductsTableAdapter = Nothing
Protected ReadOnly Property Adapter() As ProductsTableAdapter
Get
If _productsAdapter Is Nothing Then
_productsAdapter = New ProductsTableAdapter
End If

Return _productsAdapter
End Get
End Property
Public Function GetProducts() As DL_Dataset.ProductsDataTable
Return Adapter.GetData()
End Function