สวัสดีครับรบกวนขอ concept ในการทำ shopping system หน่อยครับ ไม่ทราบว่ามีหลักการทำอย่างไร

        Dim dt As New DataTable
        Dim dr As DataRow
		
	'*** Column ***'
        dt.Columns.Add("CustomerID")
        dt.Columns.Add("Name")
        dt.Columns.Add("Email")
        dt.Columns.Add("CountryCode")
        dt.Columns.Add("Budget")
        dt.Columns.Add("Used")
		
	'*** Rows ***'
	dr = dt.NewRow
	dr("CustomerID") = "C001"
	dr("Name") = "Win Weerachai"
	dr("Email") = "[email protected]"
	dr("CountryCode") = "TH"
	dr("Budget") = "1000000"
	dr("Used") = "600000"
	dt.Rows.Add(dr)
	
	Session("myCart") = dt

        Dim dt As DataTable = CType(Session("myCart"),DataTable)
        Dim dr As DataRow
			
	'*** Rows ***'
	dr = dt.NewRow
	dr("CustomerID") = "C003"
	dr("Name") = "Tony Stark"
	dr("Email") = "[email protected]"
	dr("CountryCode") = "US"
	dr("Budget") = "3000000"
	dr("Used") = "600000"
	dt.Rows.Add(dr)
	
	Session("myCart") = dt

   Me.GridView.DataSource = CType(Session("myCart"),DataTable) 
   Me.DataBid()