cart.AddProduct(productnumber, name, price, prodQty, knobColor, finishColor)

Protected Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click

        Dim cart As New Cart
        cart = Session("Cart")


        Dim flag As Integer = 1
        Dim finishColor As String = ""
        Dim knobColor As String = ""
        Dim prodQty As Integer = 0
        Dim price As Decimal = 0
        Dim name As String = ""
        Dim productnumber As Integer = 0

        If txtQty.Text <> "" And IsNumeric(txtQty.Text) Then
            prodQty = txtQty.Text
            flag = 0
        Else
            lblError.Text = "Please enter a numeric quantity."
            Return
        End If

        productnumber = prodID
        name = lblName.Text
        price = lblPrice.Text
        prodQty = txtQty.Text
        finishColor = DDFinish.SelectedItem.Text
        knobColor = DDKnob.SelectedItem.Text



        cart.AddProduct(productnumber, name, price, prodQty, knobColor, finishColor)


        Session("Cart") = cart