تكرار البيانات عند الحفظ او التعديل

توجد مشكلة عندى فى حفظ والتعديل البيانات اى انة عند اضافة بيانات للجدول فى حالة التسجيل او التعديل يتم تكرار البيانات كما هو موضح بالصورة وهذا التكرار ياتى عند الضغط على حفظ اى انه كل ضغطة يقوم بتكرار البيانات كلها 

الكود 

    Private Sub Save()
        DBBASE.Set_DataTable(table1, "qid", Quotation_ID)
        DBBASE.Set_DataTable(table2, "qid", Quotation_ID)


        tmptable1.Items.ClearAndDelete()
        'DB.SubmitChanges()
        tmptable2.Items.ClearAndDelete()
        DB.SubmitChanges()

        For Each pr As DataSet.qoutation_partsRow In table1.Rows

            Dim t As New ITEMD
            t("qid") = pr.qid
            t("description") = pr.description
            t("part_number") = pr.part_number
            t("es1") = pr.es1
            t("qty") = pr.qty
            t("price") = pr.price

            DB.Tables.FindByName("qoutation_parts").InsertItem(t)

        Next
        'DB.SubmitChanges()
        For Each pr As DataSet.qoutation_processorsRow In table2.Rows

            Dim t As New ITEMD
            t("qid") = pr.qid
            t("description") = pr.description
            t("prices") = pr.prices

            DB.Tables.FindByName("qoutation_processors").InsertItem(t)

        Next
        DB.SubmitChanges()
    End Sub

السورس كامل الرجاء المساعدة https://www.dropbox.com/s/v61rc5cvryoydky/QUOTATION.rar