Protected Sub gr_carrello_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles gr_Carrello.RowDataBound

        If e.Row.RowType = DataControlRowType.DataRow Then
            Dim item As System.Data.DataRowView = e.Row.DataItem
            Dim price As Decimal = Convert.ToDecimal(item.Item(4))

            TOT_ORDINE = TOT_ORDINE + price

         End If

End Sub