Asp.net 检查cookie是否具有特定值以防止重复

我在为购物车写代码。我需要检查cookie是否已经具有所选项目的de id，以便它不会复制它

代码：

Dim cookie\u carrito作为HttpCookie=Request.Cookies（“CkEntregas”）
Dim i_docid为整数=iddoc_print.Text
如果cookie_carrito不是什么
Dim valor_galleta作为字符串=cookie_carrito.Value
Dim galleticas As String（）=valor_galleta.Split（“，”c）
对于galleticas中的每个项目
尺寸id_documento=项目
如果id\u documento=i\u docid，则
l_resultados_carrito.Text=“您可以将文档添加到您的carrito de entregas。”
其他的
Dim hoy As DateTime=DateTime.Now.Date.ToUniversalTime.AddHours（-5）
Dim cookie_实际为HttpCookie=Request.Cookies（“CkEntregas”）
Dim cookie_carrito_作为HttpCookie=新HttpCookie（“CkEntregas”）
cookie\u carrito\u.Value=i\u docid&“，”和cookie\u实际值
cookie\u carrito\u.Expires=hoy.AddHours（72）
响应.Cookies.添加（cookie\u carrito\u）
'resultados.Text=“Cookie实现值：”&Cookie\u carrito\u.Value
l_resultados_carrito.Text=““Listo！El documento fue agregado conéxito al carrito de entregas.”
退出
如果结束
下一个
其他的
Dim hoy As DateTime=DateTime.Now.Date.ToUniversalTime.AddHours（-5）
Dim cookie_carrito_n As HttpCookie=新HttpCookie（“CkEntregas”）
cookie\u carrito\u n.Value=i\u docid
cookie\u carrito\u n.Expires=hoy.AddHours（72）
响应.Cookies.添加（cookie\u carrito\n）
'resultados.Text=“Cookie creada:&Cookie\u carrito\u n.Value
l_resultados_carrito.Text=““Listo！El documento fue agregado conéxito al carrito de entregas.”
如果结束

我使用的逻辑是检查每个逗号分隔的值，因此如果该值包含在cookie项（列表）中，它将不会添加该值，但如果该值不存在，它将添加该值并中断循环

它不起作用，因为如果cookie中的第一个值与所选项目不同，它将添加它，但它可能位于列表的第二个位置

如何检查cookie中是否已存在确定的值

---

cookie以以下格式存储值：1,5,3,9，

我使用String.Contains（）方法将cookie的值作为字符串进行检查：

Dim cookie\u carrito作为HttpCookie=Request.Cookies（“CkEntregas”）
Dim i_docid为整数=iddoc_print.Text
如果cookie_carrito不是什么
Dim valor_galleta作为字符串=cookie_carrito.Value
Dim galleticas As String（）=valor_galleta.Split（“，”c）
如果valor_galleta.包含（i_docid），则
l_resultados_carrito.Text=“您可以将文档添加到您的carrito de entregas。”
其他的
Dim hoy As DateTime=DateTime.Now.Date.ToUniversalTime.AddHours（-5）
Dim cookie_实际为HttpCookie=Request.Cookies（“CkEntregas”）
Dim cookie_carrito_作为HttpCookie=新HttpCookie（“CkEntregas”）
cookie\u carrito\u.Value=i\u docid&“，”和cookie\u实际值
cookie\u carrito\u.Expires=hoy.AddHours（72）
响应.Cookies.添加（cookie\u carrito\u）
l_resultados_carrito.Text=““Listo！El documento fue agregado conéxito al carrito de entregas.”
如果结束
其他的
Dim hoy As DateTime=DateTime.Now.Date.ToUniversalTime.AddHours（-5）
Dim cookie_carrito_n As HttpCookie=新HttpCookie（“CkEntregas”）
cookie\u carrito\u n.Value=i\u docid
cookie\u carrito\u n.Expires=hoy.AddHours（72）
响应.Cookies.添加（cookie\u carrito\n）
l_resultados_carrito.Text=““Listo！El documento fue agregado conéxito al carrito de entregas.”
如果结束

Dim cookie_carrito As HttpCookie = Request.Cookies("CkEntregas")
        Dim i_docid As Integer = iddoc_print.Text


        If cookie_carrito IsNot Nothing Then

            Dim valor_galleta As String = cookie_carrito.Value
            Dim galleticas As String() = valor_galleta.Split(","c)

            For Each item In galleticas

                Dim id_documento = item

                If id_documento = i_docid Then
                    l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesCT'><i class='fa fa-bell fa-fw'></i> Este documento ya se encuentra en tu carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"
                Else

                    Dim hoy As DateTime = DateTime.Now.Date.ToUniversalTime.AddHours(-5)
                    Dim cookie_actual As HttpCookie = Request.Cookies("CkEntregas")

                    Dim cookie_carrito_u As HttpCookie = New HttpCookie("CkEntregas")
                    cookie_carrito_u.Value = i_docid & "," & cookie_actual.Value
                    cookie_carrito_u.Expires = hoy.AddHours(72)
                    Response.Cookies.Add(cookie_carrito_u)
                    'resultados.Text = "Cookie actualizada: " & cookie_carrito_u.Value
                    l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesOK'><i class='fa fa-check fa-fw'></i> ¡Listo! El documento fue agregado con éxito al carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"

                    Exit For
                End If

            Next

        Else
            Dim hoy As DateTime = DateTime.Now.Date.ToUniversalTime.AddHours(-5)
            Dim cookie_carrito_n As HttpCookie = New HttpCookie("CkEntregas")
            cookie_carrito_n.Value = i_docid
            cookie_carrito_n.Expires = hoy.AddHours(72)
            Response.Cookies.Add(cookie_carrito_n)
            'resultados.Text = "Cookie creada: " & cookie_carrito_n.Value
            l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesOK'><i class='fa fa-check fa-fw'></i> ¡Listo! El documento fue agregado con éxito al carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"
        End If

Dim cookie_carrito As HttpCookie = Request.Cookies("CkEntregas")
        Dim i_docid As Integer = iddoc_print.Text


        If cookie_carrito IsNot Nothing Then

            Dim valor_galleta As String = cookie_carrito.Value
            Dim galleticas As String() = valor_galleta.Split(","c)

            If valor_galleta.Contains(i_docid) Then
                l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesCT'><i class='fa fa-bell fa-fw'></i> Este documento ya se encuentra en tu carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"
            Else
                Dim hoy As DateTime = DateTime.Now.Date.ToUniversalTime.AddHours(-5)
                Dim cookie_actual As HttpCookie = Request.Cookies("CkEntregas")

                Dim cookie_carrito_u As HttpCookie = New HttpCookie("CkEntregas")
                cookie_carrito_u.Value = i_docid & "," & cookie_actual.Value
                cookie_carrito_u.Expires = hoy.AddHours(72)
                Response.Cookies.Add(cookie_carrito_u)
                l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesOK'><i class='fa fa-check fa-fw'></i> ¡Listo! El documento fue agregado con éxito al carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"

            End If

        Else
            Dim hoy As DateTime = DateTime.Now.Date.ToUniversalTime.AddHours(-5)
            Dim cookie_carrito_n As HttpCookie = New HttpCookie("CkEntregas")
            cookie_carrito_n.Value = i_docid
            cookie_carrito_n.Expires = hoy.AddHours(72)
            Response.Cookies.Add(cookie_carrito_n)
            l_resultados_carrito.Text = "<div class='Col100'><div class='notificacionesOK'><i class='fa fa-check fa-fw'></i> ¡Listo! El documento fue agregado con éxito al carrito de entregas.<a href='encriptar-documento.aspx?actid=2&docid=" & i_docid & "'><i class='fa fa-window-close fa-fw'></i></a></div></div>"
        End If