حذف محصولات از سبد خرید

[hobab-theme]

سلام دوستان
لطفاً یه نگاهی به قطعه کد زیر بندازید ببینید مشکلش چیه ؟!
اگر چندتا محصول به سبد خرید اضافه شده باشه ، تا زمانی که اونا رو تک تک حذف کنیم مشکلی نداره ولی به محض اینکه چندتا از چک باکس ها ( مربوط به انتخاب محصولات جهت حذف ) رو تیک میزنیم فقط یکی رو حذف میکنه و باید مدام این کار رو تکرار کرد تا محصولات مورد نظر پاک بشن
من این سبد خرید رو تو Session ایجاد می کنم
لطفاً یه نظری بدید ببینید این چشه :متفکر:

Protected Sub btnDelete_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Try
Dim lblProductID As Label
Dim chkProduct As CheckBox
If grdShoppingCart.Rows.Count > 0 Then
If Not Session("dtblShoppingCart") Is Nothing Then
Dim intCounter As Integer = 0
For i As Integer = 0 To grdShoppingCart.Rows.Count - 1
lblProductID = CType(grdShoppingCart.Rows(i).FindControl("lblProductID"), Label)
chkProduct = CType(grdShoppingCart.Rows(i).FindControl("chkDeleteProducts"), CheckBox)
If chkProduct.Checked Then
CType(Session("dtblShoppingCart"), DataTable).Rows(i).Delete()
intCounter = intCounter + 1
End If
Next
If intCounter > 0 Then
CType(Session("dtblShoppingCart"), DataTable).AcceptChanges()
Response.Redirect(Request.Url.ToString)
End If
End If
End If
Catch ex As Exception
Dim strMessage As String = String.Empty
strMessage = "<div class=""FalseMessage"">"
strMessage += "متاسفانه سیستم قادر به حذف محصولات مورد نظر شما از سبد خریدتان نمی باشد !</div>"
lblMessages.Text = strMessage
lblMessages.Visible = True
End Try
End Sub
بازم ممنون
موفق باشید