Избегайте дублирования записи в столбцах - PullRequest
1 голос
/ 07 июня 2019

У меня есть код, который будет определять, если данные уже существуют.Проблема в том, что он все еще добавляет, даже уже существует.

Уже пробовал некоторый код, который будет добавлять и не добавлять, если данные существуют

If txtHostname.Text = "" Then
            MsgBox("Please fill-up all fields!", MsgBoxStyle.Exclamation, "Inventory!")
        Else
            Dim theQuery As String = "SELECT * FROM Asset WHERE Monitor1=@Monitor1 AND Monitor2=@Monitor2"
            Dim cmd1 As OleDbCommand = New OleDbCommand(theQuery, con)
            cmd1.Parameters.AddWithValue("@Monitor1", txtMonitor1.Text)
            cmd1.Parameters.AddWithValue("@Monitor2", txtMonitor2.Text)

            Using reader As OleDbDataReader = cmd1.ExecuteReader()
                If reader.HasRows Then
                    ' User already exists
                    MsgBox("User Already Exist!", MsgBoxStyle.Exclamation, "Add New User!")
                Else
                    ' User does not exist, add them
                    Dim cmd As OleDbCommand = New OleDbCommand("Insert into Asset ([Monitor1],[Monitor2]) values ('" + txtMonitor1.Text + "','" + txtMonitor2.Text + "')", con2)
                    cmd.ExecuteNonQuery()
                    MsgBox("Records Successfully Added!", MsgBoxStyle.Information, "Add New Customer!")
                    txtMonitor1.Text = ""
                    txtMonitor2.Text = ""
                End If
            End Using

            con.Close()
        End If

Так и должно быть, когда я ищу 1 данные вcolumn1 должен определить, существуют ли данные в column1 и column2.Не только в столбце 1.

...