“无法删除未附加的实体”错误

Question

我有两个表：Main和Vendors。

Main table:
MainID (PK)
Name
Address
...

Vendors table:
VendorID (PK)
MainID (ForeignKey)
Code
....

来自Vendors表的数据显示在ListBox控件中。

当我尝试从Vendors表中删除一行时，使用ListBox控件中的按钮，我收到以下错误：

  

无法移除尚未附加的实体。

删除按钮代码为：

        Dim button = TryCast(sender, Button)
    If button IsNot Nothing Then
        Using db As New theContext.theContext("Data Source=isostore:/theDB.sdf")
            Dim RecordToDelete As Vendors = TryCast(button.DataContext, Vendors)

            VendorsRecords.Remove(RecordToDelete)

            db.VendorsRecords.DeleteOnSubmit(RecordToDelete)

            db.SubmitChanges()
        End Using
    End If

Answer 1

添加行

db.VendorsRecords.Attach(RecordtoDelete)

在给你错误的行之前。

您收到此错误，因为db上下文不知道您尝试删除的记录。