在尝试插入之前检查重复值 (ASP.NET)

Question

我有一个表单，其中表单第一页上的两个字段构成主键。我想在尝试插入记录之前检查重复值，因为我不希望用户一路浏览表单才发现他们无法提交它。因此，当用户尝试转到表单的下一页时，我尝试检查重复值。我不太确定该怎么做，果然我收到了一个错误。 （“对象引用未设置为对象的实例。”）问题显然出在我的 if 语句中，“如果 myValue.Length > 0 那么”，但我不确定需要用什么来代替它。

Protected Sub CustomValidator1_ServerValidate(ByVal source As Object, ByVal args As System.Web.UI.WebControls.ServerValidateEventArgs) Handles CustomValidator1.ServerValidate

    'get values
    Dim checkPrefix = txtCoursePrefix.Text
    Dim checkNum = txtCourseNum.Text

    'db connectivity
    Dim myConn As New OleDbConnection
    myConn.ConnectionString = AccessDataSource1.ConnectionString
    myConn.Open()

    'select records
    Dim mySelect As New OleDbCommand("SELECT prefix, course_number FROM tableCourse WHERE prefix='checkPrefix' AND course_number='checkNum'", myConn)

    'execute(Command)
    Dim myValue As String = mySelect.ExecuteScalar()
    'check if record exists
    If myValue.Length > 0 Then
        CustomValidator1.ErrorMessage = "some exp text"
        CustomValidator1.SetFocusOnError = "true"
        CustomValidator1.IsValid = "false"
    End If

End Sub

我想我会发布最终的解决方案：

'select records
    Dim mySelect As New OleDbCommand("SELECT 1 FROM tableCourse WHERE prefix=? AND course_number=?", myConn)
    mySelect.Parameters.AddWithValue("@checkPrefix", checkPrefix)
    mySelect.Parameters.AddWithValue("@checkNum", checkNum) 

    'execute(Command)
    Dim myValue = mySelect.ExecuteScalar()

    'check if record exists
    If myValue IsNot Nothing Then
        CustomValidator1.SetFocusOnError = True
        args.IsValid = False
    End If

Answer 1

此错误表明 myValue 变量的内容为空。如果它为空，则不能在其上使用 Length 属性（或任何其他属性）。您必须明确检查 null：

If myValue IsNot Nothing Then

EDIT 1
你的sql查询是错误的。我不知道什么是正确的查询，因为我不知道你的数据库，但我认为你打算写这个：

Dim mySelect As New OleDbCommand("SELECT prefix, course_number FROM tableCourse WHERE prefix=" + checfkPreix + " AND course_number=" + checkNum, myConn)

或类似的东西。您可能需要考虑使用 string.Format 函数形成字符串。而且您还需要确保针对 SQL 注入提供某种保护，因为您形成来自用户输入的查询。在您的情况下，使用 OleDbParameter 可能是合适的。

编辑2

您也正确地提到了 ExecuteScalar 可能存在问题。 ExecuteScalar 应该返回单个值，而您的选择查询返回两个值（前缀和 course_number）。更改它，使其返回单个参数 SELECT prefix FROM 或简单地 SELECT 1 FROM，然后返回查询的其余部分：

Dim mySelect As New OleDbCommand("SELECT 1 FROM tableCourse WHERE prefix=? AND course_number=?", myConn)
    mySelect.Parameters.AddWithValue("@checkPrefix", checkPrefix)
    mySelect.Parameters.AddWithValue("@checkNum", checkNum)

Edit 3
您没有在验证器中正确设置失败的验证。
添加

 args.IsValid = False 

到 if 语句中。

Answer 2

首先 ExecuteScalar 将仅返回单个值，因此在这种情况下，您只会从结果中获取列 prefix。其次，如果与您的查询不匹配，它将返回 null，因此您的下一次长度检查应考虑到这种情况：

if String.IsNullOrEmpty(myValue) Then
...

参考：http://msdn.microsoft.com/en-us/library/system.data.sqlclient.sqlcommand.executescalar.aspx

Answer 3

如果没有重复，则 myValue 为 null，因此仅当 myValue 不为 null 时才必须应用 .Length（这意味着检查 仅 >null 就足够了；没有 .Length）

If Not string.IsNullOrEmpty(myValue) Then

Answer 4

尝试这样的东西（你必须将其适应VB.Net） DBNull 与 Null 或 Nothing 不同，所以你必须将它与两者进行比较

If myValue <> DBNull and not myvalue is nothing Then