Question

Private Sub Delete1_Click(sender As Object, e As EventArgs) Handles Delete1.Click
        Dim mResult
        Dim ObjConnection As New MySqlConnection()
        mResult = MsgBox("You are really want to delete the slected record?",
        vbYesNo + vbQuestion, "Removal Confirmation")
        If mResult = vbNo Then
            Exit Sub
        End If
        ObjConnection.ConnectionString = "server=127.0.0.1;userid=root;password=;database=equipment"
        ObjConnection.Open()
        Try
            Dim ObjCommand As New MySqlCommand()
            ObjCommand.Connection = ObjConnection

            ObjCommand.CommandText = "delete from equipment where asset_code='" & Me.DataGridView1.CurrentRow.Cells(0).Value & "'"
            ObjCommand.ExecuteNonQuery()
        Finally
            ObjConnection.Close()
        End Try

        Me.DataGridView1.Rows.Remove(Me.DataGridView1.CurrentRow)

    End Sub

这是删除所选行时按钮的代码，我想将其插入新数据库

Answer 1

有几种方法可以做到，我特别想到两个：

*在设备表上创建一个触发器，在执行delete语句时将调用该触发器。如果您使用的是SQL Server，则可以查看特殊的＆＃39;已删除的＆＃39;处理由delete语句删除的所有记录的表，可以使用它将记录存储在另一个数据库中。在MySQL中，这个等效的特殊表名为＆＃39; OLD＆＃39;。

* DON＆＃39; T执行删除语句，只需使用＆＃34;逻辑删除＆＃34;。这意味着在每个表格（如列）上添加对每个记录的引用，这将确定记录是否有效＆＃39;或者＆＃39;删除＆＃39;。因此，当删除项目时，只需更改“＆＃39; 0＆＃39; （有效）到＆＃39; 1＆＃39; （删除），当查询数据时添加一个附加条件，您将指示该记录是活动的还是已删除。

后一个选项实际上是首选方式，它是高级企业应用程序（如Oracle）使用的选项。它保证您将拥有许多用户/客户更喜欢的所有可能的历史信息。当您希望清理数据库，删除不再需要的信息或已经备份的信息时，只需使用删除语句。

如何将已删除的选定行添加到备份数据库？

1 个答案: