VB Code:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
objCartDT = Session("Cart")
If objCartDT Is Nothing Then
lblNoItems.Text = "There are no items in your cart."
Else
lblTotal.Text = "Total: $" & GetItemTotal()
dgCart.DataSource = Session("Cart")
dgCart.DataBind()
End If
End Sub
VB Code:
Sub dgCart_Update(ByVal s As Object, ByVal e As DataGridCommandEventArgs)
Dim txtQuantity As TextBox
Dim intCartID As Integer
intCartID = dgCart.DataKeys(e.Item.ItemIndex)
txtQuantity = e.Item.FindControl("txtQuantity")
For Each objDR In objCartDT.Rows
If objDR("CartID") = intCartID Then 'this validates true
objDR("Quantity") = Int32.Parse(txtQuantity.Text)
Exit For
End If
Next
lblTotal.Text = "Total: $" & GetItemTotal()
dgCart.EditItemIndex = -1
dgCart.DataSource = objCartDT
dgCart.DataBind()
End Sub