如何检查当前 ID 是否存在于该表中

Question

我正在使用 VB.net 和 Sql server 2005。

我在有 CPUserID 的应用程序中有 GridView。 GridView 中可能有数千条具有不同 CPUserID 的记录。

现在我有一个按钮“分配令牌”。但在分配令牌之前，我想检查我的 Token 表，如果该 CPUserID 已经存在于表中，它不应该允许用户分配令牌，并且会为该用户返回一些消息。

 For Each curRow As GridViewRow In GridView1.Rows
            Dim cpuserid As Label = CType(curRow.Cells(1).FindControl("lblCPUserID"), Label)                
        Next

TOKEN表结构如下：

TokenID、CPUserID、StatusID（全整数）

请推荐！一些示例代码

Answer 1

对 Token 表执行查询以查看该表中是否已经存在与给定 id 对应的行：

SELECT COUNT(*) FROM Token WHERE CPUserID = 5

例如。

为了在 VB.NET 中执行此操作，您必须使用 SqlConnection 和 SqlCommand 类。 此外，请务必使用参数化查询。

在 C# 中，代码大致如下：

SqlConnection conn = new SqlConnection ("here comes the connectionstring to the db.");

conn.Open();
try
{
    SqlCommand cmd = new SqlCommand ();
    cmd.Connection = conn;
    cmd.CommandText = "SELECT COUNT(*) FROM Token WHERE CPUserId = :p_UserId";
    cmd.Parameters.Add ("p_UserId", SqlDbType.Int32).Value = 5;
    object result = cmd.ExecuteScalar();

    if( Convert.ToInt32(result) > 0 )
    {
         MessageBox.Show ("Token already exists for user");
    }
}
finally
{
     conn.Close();
}

为了提高性能，您必须确保在 Token 表上创建正确的索引。 CPUserId 上的索引可能会对此查询有所帮助。

Answer 2

首先感谢所有回答这个问题的人。

我通过以下解决方案解决了上述问题：

SQL 过程：

我在 SQL Server 2005 中创建了一个过程

GO
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[uspUpdateAllocateToken]') AND type in (N'P', N'PC'))
DROP PROCEDURE [dbo].[uspUpdateAllocateToken]

GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

CREATE PROCEDURE [dbo].[uspUpdateAllocateToken]
( @CPUserID INT)
AS

IF NOT EXISTS(SELECT TokenID FROM tblToken WHERE CPUserId=@CPUserID AND StatusID IN (41,47))
BEGIN

UPDATE tblToken
SET 
CPUserID = @CPUserID,
StatusID=47

WHERE
 tblToken.TOKENID = (SELECT TOP 1 TOKENID FROM TBLTOKEN WHERE CPUSERID IS NULL AND STATUSID = 40)
END

在我的应用程序中进一步点击按钮。我写下面的代码：

Protected Sub ibtnAllocateTokens_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ibtnAllocateTokens.Click
        Try
            Dim conString As String = WebConfigurationManager.ConnectionStrings("LocalSqlServer").ConnectionString
            Dim con As New SqlConnection(conString)
            con.Open()
            Dim cmd As SqlCommand
            For Each gvRow As GridViewRow In GridView1.Rows
                cmd = New SqlCommand("uspUpdateAllocateToken", con)
                cmd.CommandType = CommandType.StoredProcedure
                cmd.Parameters.Add("@CPUserID", SqlDbType.Int).Value = CType(gvRow.Cells(1).FindControl("lblCPUserID"), Label).Text
                cmd.ExecuteScalar()
                lblAllocateTokenMessage.Visible = True
            Next

        Catch ex As Exception
            ErrorHandler.WriteError(ex.Message)
        End Try
    End Sub

请查看并告诉我此实现是否有任何问题。

干杯！