How to pass Object from VB to another VB then to A

berneiceqdarsowq · Apr 28, 2012

Hi, I am learning to build a small three-tiered ASP application. I have a UI.ASPX, BusinessObj.VB and DataObject.VB. My problem is after I retrieved a record in DataObject.VB, how do I pass the retrieved Data from DataObject.VB to BusinessObj.VB, and back to UI.ASPX ? I am hoping to retrieve the DataObject properties in UI.ASPX but dun know how, and is it the best way ? Here is an Example of how I have coded which is not really correct. DataOBj.VB: Public Class DataLayerObj_Categories Private sCategoryName As String Private sCategoryDescription As String Public Property CategoryName() As String Get Return sCategoryName End Get Set(ByVal Value As String) sCategoryName = Value End Set End Property Public Property CategoryDescription() As String Get Return sCategoryDescription End Get Set(ByVal Value As String) sCategoryDescription = Value End Set End Property Public Function RetrieveRecord(ByVal ID As Integer) Dim myConnection As SqlConnection Dim myCommand As SqlCommand Dim myDataReader As SqlDataReader myConnection = New SqlConnection(sConnStr) myConnection.Open() myCommand = New SqlCommand("select CategoryName, CategoryDescription from Categories Where CategoryID = " & ID, myConnection) myDataReader = myCommand.ExecuteReader() CategoryName = myDataReader.Item("CategoryName") CategoryDescription = myDataReader.Item("CategoryDescription") myDataReader.Close() myConnection.Close() End Function End Class -------------------------------------------------------------- BusinessObj.VB: Public Class BusinessObj_Categories Private Data As DataLayerObj_Categories Public Function RetrieveRecord() Return Data.RetriveRecord() End Function End Class -------------------------------------------------------------- UI.ASPX: Dim Bus As BusinessObj_Categories Bus = New BusinessObj_Categories() Call Bus.RetrieveRecord '??? Dun know how to retrieve properties in DataObject to get the CategoryName and CategoryDescription If you could show me some sample codes would be very nice

Thanks Matthew

How to pass Object from VB to another VB then to A

berneiceqdarsowq

New Member