PROSAGA码农传奇-CMDB-使用带有SQL值的VB.net IF语句

使用带有SQL值的VB.net IF语句

作者: 喜欢一个人丶
发布时间: 2024-12-17 07:19:05 (2月前)
转自：

<div class =“post-text”itemprop =“text”>
  
    您遇到的问题不仅仅是语法错误。根据您发布的代码，您似乎想要通知用户存在重复的代码。既然你有
     <code>
 Else
 </code>
    ，我打算猜一下，如果找不到重复的代码，你想要插入。
  
  
    目前受影响的行数
     <code>
 ExecuteNonQuery()
 </code>
     将
    的
      决不
    </强>
     大于1.此外，在您发布的代码中，您永远不会为其分配值
     <code>
 @AddCode
 </code>
     参数 - 如果
     <code>
 AddCode
 </code>
     column不能为null，这可能会导致错误。
  
  
    您可能想要做的是检查代码是否存在，如果不存在则添加它。像这样的东西可以做到这一点：
  
   <pre>
 <code>
 Using cmdb = New SqlCommand("SELECT * FROM AdditionalDaisyCodes WHERE AddCode = @AddCode", con)
 con.Open()

cmdb.Parameters.AddWithValue("@AddCode", txtAddCode.Text)
    Dim reader As SqlDataReader = cmdb.ExecuteReader()

If reader.HasRows Then
        MessageBox.Show("Duplicate Codes Exist!", "Indigo Billing", _
MessageBoxButtons.OK, MessageBoxIcon.Information)

Else
        cmdb.CommandText = "INSERT INTO AdditionalDaisyCodes(AddCode) Values(@AddCode)"
        cmdb.Parameters.AddWithValue("@AddCode", txtAddCode.Text)
        cmdb.ExecuteNonQuery()

End If

con.Close()
End Using

</code>
 </pre>
  
     <code>
 txtAddCode.Text
 </code>
     在上面的例子中假设代码来自a
     <code>
 TextBox
 </code>
     命名
     <code>
 txtAddCode
 </code>
    。首先，它通过运行受WHERE子句约束的SELECT查询来检查代码是否已经在表中。如果退回
     <code>
 SqlDataReader
 </code>
     有行，然后该代码已经在表中，并显示消息框。
  
  
    如果
     <code>
 SqlDataReader
 </code>
     没有行，那么代码不在表中
     <code>
 cmdb
 </code>
     被重用来插入。
  
  
    还要注意你可以把
     <code>
 SqlConnection
 </code>
     在一个
     <code>
 Using
 </code>
     阻止，也不需要打电话
     <code>
 Close()
 </code>
     明确地在连接上。
  
</DIV>